summaryrefslogblamecommitdiff
path: root/user/perl-dbd-pg/fix-tests.patch
blob: fd977b05c651ce330cfb3945c02e65287bde722f (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13











                                                                                   
--- DBD-Pg-3.8.1/t/dbdpg_test_setup.pl.old	2019-07-06 15:16:37.000000000 +0000
+++ DBD-Pg-3.8.1/t/dbdpg_test_setup.pl	2019-07-11 22:52:13.898484394 +0000
@@ -425,10 +425,6 @@
 		if ($info =~ /but is not empty/) {
 			## Assume this is already good to go
 		}
-		elsif ($info !~ /pg_ctl/) {
-			$@ = "initdb did not give a pg_ctl string: $info";
-			last GETHANDLE; ## Fail - bad output
-		}
 
 		## Which user do we connect as?
 		if (!$su and $info =~ /owned by user "(.+?)"/) {