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

Author: turnstep
Date: Sun Jul 20 07:38:53 2008
New Revision: 11546

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

Log:
Further sanity check for better error reporting.


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 07:38:53 2008
@@ -311,6 +311,10 @@
 				$@ = "Failed to run initdb as user $su: $@";
 				last GETHANDLE;
 			}
+			if (! -e "$test_database_dir/data") {
+				$@ = 'Could not create a test database';
+				last GETHANDLE;
+			}
 			## At this point, both $su and $testuser are set
 		}