diff options
author | Russ Allbery <rra@stanford.edu> | 2007-12-01 01:14:14 +0000 |
---|---|---|
committer | Russ Allbery <rra@stanford.edu> | 2007-12-01 01:14:14 +0000 |
commit | 5500da38b3cbdb153453ace4a344b8c280927b3c (patch) | |
tree | 91333bdaf24d025de1e85f09946901a80585b6e8 | |
parent | eb3b657cd8620ecd34dd3c224a4263d90381789b (diff) |
Actually use the username and password from the database configuration.
-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"; } |