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;
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.