From:	turnstep@cvs.perl.org	Date:	Thu Aug 28 20:00:26 2008
Subject:	[svn:DBD-Pg] r11684 - DBD-Pg/trunk/t

Author: turnstep
Date: Thu Aug 28 19:00:24 2008
New Revision: 11684

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

Log:
Don't try and create a new database when testing known invalid command string.
Fixes a long-outstanding mystery CPAN tester failure.


Modified: DBD-Pg/trunk/t/01connect.t
==============================================================================
--- DBD-Pg/trunk/t/01connect.t	(original)
+++ DBD-Pg/trunk/t/01connect.t	Thu Aug 28 19:00:24 2008
@@ -72,7 +72,7 @@
 
 	$t=q{Connect with invalid option fails};
 	my $err;
-	(undef,$err,$dbh) = connect_database({ dbreplace => 'dbbarf' });
+	(undef,$err,$dbh) = connect_database({ dbreplace => 'dbbarf', nocreate => 1 });
 	like ($err, qr{DBI connect.+failed:}, $t);
 
 	for my $opt (qw/db dbname database/) {