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

[turnstep]

Author: turnstep
Date: Tue Jul 22 21:05:28 2008
New Revision: 11574

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

Log:
No idea why this failure is shoing up, but we don't need to see the whole 
message.


Modified: DBD-Pg/trunk/t/01connect.t
==============================================================================
--- DBD-Pg/trunk/t/01connect.t  (original)
+++ DBD-Pg/trunk/t/01connect.t  Tue Jul 22 21:05:28 2008
@@ -79,6 +79,7 @@
                $t=qq{Connect using string '$opt' works};
                $dbh and $dbh->disconnect();
                (undef,$err,$dbh) = connect_database({dbreplace => $opt});
+               $err =~ s/(Previous failure).*/$1/;
                is ($err, '', $t);
        }