Author: turnstep
Date: Thu Jan 10 07:12:32 2008
New Revision: 10505

Modified:
   DBD-Pg/trunk/Changes
   DBD-Pg/trunk/Pg.pm

Log:
We were using dbh->{User}, but should be dbh->{Username}


Modified: DBD-Pg/trunk/Changes
==============================================================================
--- DBD-Pg/trunk/Changes        (original)
+++ DBD-Pg/trunk/Changes        Thu Jan 10 07:12:32 2008
@@ -1,6 +1,7 @@
 ('GSM' is Greg Sabino Mullane, [EMAIL PROTECTED])
 
 2.0.0
+       - Change $dbh->{User} to $dbh->{Username} [GSM]
        - Add three new columns to column_info, to return unquoted 
                version: pg_schema, pg_table, and pg_columns. Add all 
                three to primary_key_info, and the first two to table_info

Modified: DBD-Pg/trunk/Pg.pm
==============================================================================
--- DBD-Pg/trunk/Pg.pm  (original)
+++ DBD-Pg/trunk/Pg.pm  Thu Jan 10 07:12:32 2008
@@ -172,9 +172,10 @@
                $pass = defined($pass) ? $pass : defined $ENV{DBI_PASS} ? 
$ENV{DBI_PASS} : "";
 
                my ($dbh) = DBI::_new_dbh($drh, {
-                       'Name' => $dbname,
-                       'User' => $user, 'CURRENT_USER' => $user,
-               });
+                       'Name'         => $dbname,
+                       'Username'     => $user,
+                       'CURRENT_USER' => $user,
+                });
 
                # Connect to the database..
                DBD::Pg::db::_login($dbh, $dbname, $user, $pass) or return 
undef;

Reply via email to