diff options
Diffstat (limited to 'tests/database.scm')
-rw-r--r-- | tests/database.scm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/database.scm b/tests/database.scm index 271f166..6098465 100644 --- a/tests/database.scm +++ b/tests/database.scm @@ -87,7 +87,9 @@ (test-assert "db-init" (begin (%db (db-init database-name)) - (%db-channel (make-worker-thread-channel (%db))) + (%db-channel (make-worker-thread-channel + (lambda () + (list (%db))))) #t)) (test-assert "sqlite-exec" |