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

[turnstep]

Author: turnstep
Date: Thu Jan 17 09:09:53 2008
New Revision: 10589

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

Log:
Try extra hard to get a connection by setting a default DBI_DSN


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  Thu Jan 17 09:09:53 2008
@@ -45,6 +45,10 @@
 
        my $dbh = $arg->{dbh} || '';
 
+       if (!defined $ENV{DBI_DSN}) {
+               $ENV{DBI_DSN} = 'dbi:Pg:';
+       }
+
        if (!$dbh) {
                eval {
                        $dbh = DBI->connect($ENV{DBI_DSN}, $ENV{DBI_USER}, 
$ENV{DBI_PASS},