furnace.auth.providers.db: make test db name use cpu name.

db4
John Benediktsson 2013-05-14 11:32:20 -07:00
parent 8805da92e0
commit 832a06e848
1 changed files with 7 additions and 3 deletions

View File

@ -4,14 +4,18 @@ furnace.auth.login
furnace.auth.providers
furnace.auth.providers.db tools.test
namespaces db db.sqlite db.tuples continuations
io.files io.files.temp io.directories accessors kernel ;
io.files io.files.temp io.directories accessors kernel
sequences system ;
IN: furnace.auth.providers.db.tests
<action> "test" <login-realm> realm set
[ "auth-test.db" temp-file delete-file ] ignore-errors
: auth-test-db-name ( -- string )
cpu name>> "auth-test." ".db" surround ;
"auth-test.db" temp-file <sqlite-db> [
[ auth-test-db-name temp-file delete-file ] ignore-errors
auth-test-db-name temp-file <sqlite-db> [
user ensure-table