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

Author: turnstep
Date: Sat Feb  6 21:04:53 2010
New Revision: 13814

Modified:
   DBD-Pg/trunk/t/01connect.t

Log:
Bail out if the second connection fails.


Modified: DBD-Pg/trunk/t/01connect.t
==============================================================================
--- DBD-Pg/trunk/t/01connect.t	(original)
+++ DBD-Pg/trunk/t/01connect.t	Sat Feb  6 21:04:53 2010
@@ -39,6 +39,9 @@
 $t=q{Second database connection attempt worked};
 (undef,$connerror,$dbh) = connect_database();
 is ($connerror, '', $t);
+if ($connerror ne '') {
+    BAIL_OUT 'Second connection to database failed, bailing out';
+}
 
 ## Grab some important values used for debugging
 my @vals = qw/array_nulls backslash_quote server_encoding client_encoding standard_conforming_strings/;