diff options
Diffstat (limited to 'perl/t/init.t')
-rwxr-xr-x | perl/t/init.t | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/perl/t/init.t b/perl/t/init.t index 81c034d..18f8e3b 100755 --- a/perl/t/init.t +++ b/perl/t/init.t @@ -14,12 +14,11 @@ use Wallet::ACL; use Wallet::Config; use Wallet::Server; -# Use a local SQLite database for testing. -$Wallet::Config::DB_DRIVER = 'SQLite'; -$Wallet::Config::DB_INFO = 'wallet-db'; -unlink 'wallet-db'; +use lib 't/lib'; +use Util; # Use Wallet::Server to set up the database. +db_setup; my $server = eval { Wallet::Server->initialize ('admin@EXAMPLE.COM') }; is ($@, '', 'Database initialization did not die'); ok ($server->isa ('Wallet::Server'), ' and returned the right class'); |