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";
                        }

Reply via email to