From 5500da38b3cbdb153453ace4a344b8c280927b3c Mon Sep 17 00:00:00 2001
From: Russ Allbery <rra@stanford.edu>
Date: Sat, 1 Dec 2007 01:14:14 +0000
Subject: Actually use the username and password from the database
 configuration.

---
 perl/t/schema.t | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

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";
 }
-- 
cgit v1.2.3