From 0ec04f853bd1a436b33ddad0feac10e61c791f39 Mon Sep 17 00:00:00 2001 From: Russ Allbery Date: Thu, 30 Aug 2007 17:51:36 +0000 Subject: Unlink the database before creating it to protect against previous test failures. --- perl/t/init.t | 1 + 1 file changed, 1 insertion(+) (limited to 'perl/t/init.t') diff --git a/perl/t/init.t b/perl/t/init.t index 8f6d034..89fd3c8 100755 --- a/perl/t/init.t +++ b/perl/t/init.t @@ -13,6 +13,7 @@ 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 Wallet::Server to set up the database. my $server = eval { Wallet::Server->initialize ('admin@EXAMPLE.COM') }; -- cgit v1.2.3