db: adjust lazy requires for cross-place mode

This commit is contained in:
Ryan Culpepper 2011-09-24 06:22:35 -06:00
parent 52a738140d
commit 717bc17aaf

View File

@ -30,9 +30,9 @@ where <connect-spec> ::= (list 'sqlite3 path/sym mode-sym delay-num limit-num)
(loop)))
(lazy-require
["../../main.rkt" (sqlite3-connect
odbc-connect
odbc-driver-connect)])
["../sqlite3/main.rkt" (sqlite3-connect)]
["../odbc/main.rkt" (odbc-connect
odbc-driver-connect)])
(define (serve client-chan)
(match (place-channel-get client-chan)