Revert bad quoting.
authorGreg Sabino Mullane <[email protected]>
Thu, 9 Apr 2009 23:11:09 +0000 (19:11 -0400)
committerGreg Sabino Mullane <[email protected]>
Thu, 9 Apr 2009 23:11:09 +0000 (19:11 -0400)
t/CP_Testing.pm

index 1871972a6a9305c99a843b6db88b0221ea75cfbe..ff0be5ad071992a3e78f2f665072dbcc6f4a295f 100644 (file)
@@ -126,7 +126,7 @@ sub test_database_handle {
        } ## end of needs startup
 
        my $here = cwd();
-       my $dsn = qq{dbi:Pg:host="$here/$dbdir/data/socket";dbname=postgres};
+       my $dsn = qq{dbi:Pg:host=$here/$dbdir/data/socket;dbname=postgres};
        my @superdsn = ($dsn, '', '', {AutoCommit=>0,RaiseError=>1,PrintError=>0});
        my $dbh = DBI->connect(@superdsn);
        $dbh->ping() or die qq{Failed to ping!\n};