Author: turnstep
Date: Fri Oct 1 20:55:13 2010
New Revision: 14455
Modified:
DBD-Pg/trunk/Pg.pm
Log:
Return bare instead of undef, per CPAN bug #61574
Modified: DBD-Pg/trunk/Pg.pm
==============================================================================
--- DBD-Pg/trunk/Pg.pm (original)
+++ DBD-Pg/trunk/Pg.pm Fri Oct 1 20:55:13 2010
@@ -184,7 +184,7 @@
$connstring .= ";$attr";
}
- my $dbh = DBD::Pg::dr::connect($drh, $connstring) or return undef;
+ my $dbh = DBD::Pg::dr::connect($drh, $connstring) or return;
$dbh->{AutoCommit}=1;
my $SQL = 'SELECT pg_catalog.quote_ident(datname) FROM pg_catalog.pg_database ORDER BY 1';
my $sth = $dbh->prepare($SQL);
lmpx.com only provides a reader for public news (NNTP) servers. It is not
affiliated with the servers or forums shown here and is not responsible for
the content of articles, which is written by their respective authors.