[svn:DBD-Pg] r11517 - DBD-Pg/trunk/t

[email protected]
Newsgroups perl.dbd.pg.changes
Message-ID <[email protected]>
Author: turnstep
Date: Thu Jul 10 10:17:05 2008
New Revision: 11517

Modified:
   DBD-Pg/trunk/t/dbdpg_test_setup.pl

Log:
Assume an empty response means initdb is simply not on the system.


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	Thu Jul 10 10:17:05 2008
@@ -229,7 +229,12 @@
 		last GETHANDLE if $@;
 		if (!defined $info or ($info !~ /\@postgresql\.org/ and $info !~ /run as root/)) {
 			if (defined $info) {
-				$@ = "Bad initdb output: $info";
+				if ($info !~ /\w/) {
+					$@ = 'initdb not found: cannot run full tests without a Postgres database';
+				}
+				else {
+					$@ = "Bad initdb output: $info";
+				}
 			}
 			else {
 				my $msg = 'Failed to run initdb.';
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.