Author: turnstep
Date: Sun Jul 20 21:24:22 2008
New Revision: 11552
Modified:
DBD-Pg/trunk/t/dbdpg_test_setup.pl
Log:
Minor late-night tweaks.
Modified: DBD-Pg/trunk/t/dbdpg_test_setup.pl
==============================================================================
--- DBD-Pg/trunk/t/dbdpg_test_setup.pl (original)
+++ DBD-Pg/trunk/t/dbdpg_test_setup.pl Sun Jul 20 21:24:22 2008
@@ -563,6 +563,7 @@
mkdir $tempdir or return '';
return $tempdir;
}
+ return '';
} ## end of find_tempdir
@@ -601,7 +602,8 @@
}
return $testdsn, $testuser, $helpconnect, $su, $uid, $testdir, $pg_ctl,
$initdb, $error;
-}
+
+} ## end of get_test_settings
sub schema_exists {
@@ -613,7 +615,7 @@
$sth->finish();
return $count < 1 ? 0 : 1;
-}
+} ## end of schema_exists
sub relation_exists {
@@ -626,7 +628,8 @@
$sth->finish();
return $count < 1 ? 0 : 1;
-}
+} ## end of relation_exists
+
sub cleanup_database {
@@ -661,7 +664,8 @@
return;
-}
+} ## end of cleanup_database
+
sub shutdown_test_database {
@@ -684,7 +688,8 @@
return if ! eval { require File::Path; 1; };
warn "Removing test database directory\n";
File::Path::rmtree($testdir);
+ return;
-}
+} ## end of shutdown_test_database
1;