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

Author: turnstep
Date: Wed May  7 20:39:20 2008
New Revision: 11216

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

Log:
As a last resort, try for an initdb in the path.


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	Wed May  7 20:39:20 2008
@@ -191,8 +191,7 @@
 		## Use the initdb found by App::Info
 		my $initdb = $ENV{PGINITDB} || '';
 		if (!$initdb or ! -e $initdb) {
-			$@ = 'Could not find an initdb executable to create a test database';
-			last GETHANDLE;
+			$initdb = 'initdb';
 		}
 		$info = '';
 		eval {

• [svn:DBD-Pg] r11216 - DBD-Pg/trunk/t by turnstep