Author: turnstep
Date: Fri Oct 1 20:39:05 2010
New Revision: 14452
Modified:
DBD-Pg/trunk/t/03dbmethod.t
Log:
Remove old debug line.
Modified: DBD-Pg/trunk/t/03dbmethod.t
==============================================================================
--- DBD-Pg/trunk/t/03dbmethod.t (original)
+++ DBD-Pg/trunk/t/03dbmethod.t Fri Oct 1 20:39:05 2010
@@ -23,7 +23,7 @@
my $dbh = connect_database();
-if (! defined $dbh) {
+if (! $dbh) {
plan skip_all => 'Connection to database failed, cannot continue
testing';
}
plan tests => 531;
@@ -43,7 +43,6 @@
$dbh->do(q{}); ## This used to break, so we keep it as a test...
$SQL = q{SELECT '2529DF6AB8F79407E94445B4BC9B906714964AC8' FROM dbd_pg_test
WHERE id=?};
$sth = $dbh->prepare($SQL);
-warn "RESULT is $result\n";
$sth->finish();
$sth = $dbh->prepare_cached($SQL);
$sth->finish();