diff options
| -rwxr-xr-x | perl/t/schema.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/perl/t/schema.t b/perl/t/schema.t index 566d67d..cf98513 100755 --- a/perl/t/schema.t +++ b/perl/t/schema.t @@ -54,7 +54,9 @@ unlink 'wallet-db'; # Now repeat the test against the configured database in case it's different. db_setup; my $connect = "DBI:${Wallet::Config::DB_DRIVER}:${Wallet::Config::DB_INFO}"; -$dbh = DBI->connect ($connect); +my $user = $Wallet::Config::DB_USER; +my $password = $Wallet::Config::DB_PASSWORD; +$dbh = DBI->connect ($connect, $user, $password); if (not defined $dbh) { die "cannot connect to database $connect: $DBI::errstr\n"; } |