Index: tests/unittests/basicserver.scm ================================================================== --- tests/unittests/basicserver.scm +++ tests/unittests/basicserver.scm @@ -43,11 +43,11 @@ (trace rmt:get-connection with-input-from-request ) -(define *db* #f) +(define *db* (db:setup #f)) (test #f #f (api:execute-requests *db* 'get-server (list (conc *toppath*"/.db/1.db")))) (test #f #f (rmt:general-open-connection *rmt:remote* (list (conc *toppath*"/.db/1.db")))) ;; (delete-file* "logs/1.log") ;; (define run-id 1)