Author: turnstep
Date: Sat Jun 21 17:38:19 2008
New Revision: 11439
Modified:
DBD-Pg/trunk/t/dbdpg_test_setup.pl
Log:
Older versions of initdb complain about root even with --help argument.
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 Sat Jun 21 17:38:19 2008
@@ -226,7 +226,7 @@
$info = qx{initdb --help 2>&1};
};
last GETHANDLE if $@;
- if (!defined $info or $info !~ /[EMAIL PROTECTED]/) {
+ if (!defined $info or ($info !~ /[EMAIL PROTECTED]/ and $info
!~ /run as root/) {
if (defined $info) {
$@ = "Bad initdb output: $info";
}