Author: turnstep
Date: Wed Apr 30 16:11:53 2008
New Revision: 11160
Modified:
DBD-Pg/trunk/t/dbdpg_test_setup.pl
Log:
Typo.
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 Wed Apr 30 16:11:53 2008
@@ -351,7 +351,7 @@
print $fh "## Testdir: $test_database_dir\n" if 16 ==
$helpconnect;
print $fh "## Testowner: $su\n" if $su;
}
- close $fh or dir qq{Could not close "$helpfile": $!\n};
+ close $fh or die qq{Could not close "$helpfile": $!\n};
}
GOTDBH: