Silence perl warning about uninitialized value

adunstan · adunstan · commit 0d1401931868 · 2021-08-01T13:03:15.000-04:00
diff --git a/src/test/modules/ssl_passphrase_callback/t/001_testfunc.pl b/src/test/modules/ssl_passphrase_callback/t/001_testfunc.pl
@@ -10,7 +10,7 @@
 use Test::More;
 use PostgresNode;
 
-unless ($ENV{with_ssl} eq 'openssl')
+unless (($ENV{with_ssl} || "") eq 'openssl')
 {
 	plan skip_all => 'OpenSSL not supported by this build';
 }

Original file line number	Diff line number	Diff line change
`@@ -10,7 +10,7 @@`
`10`	`10`	`use Test::More;`
`11`	`11`	`use PostgresNode;`
`12`	`12`
`13`		`-unless ($ENV{with_ssl} eq 'openssl')`
	`13`	`+unless (($ENV{with_ssl} \|\| "") eq 'openssl')`
`14`	`14`	`{`
`15`	`15`	`plan skip_all => 'OpenSSL not supported by this build';`
`16`	`16`	`}`