From ff85eb0277ac30ef48108f2a27ce02bbc48a3f5f Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Sun, 24 Nov 2019 03:19:42 +0000 Subject: [PATCH 1/1] mboxgz: fix compiler parse error under under Perl 5.16.3 Perl 5.16.3 (and possibly older versions) fails with the following errors (from CentOS7): Use of ?PATTERN? without explicit operator is deprecated Search pattern not terminated --- lib/PublicInbox/MboxGz.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/PublicInbox/MboxGz.pm b/lib/PublicInbox/MboxGz.pm index 2a55447f..1621cff8 100644 --- a/lib/PublicInbox/MboxGz.pm +++ b/lib/PublicInbox/MboxGz.pm @@ -63,7 +63,7 @@ sub getline { # signal that we're done and can return undef next call: delete $self->{ctx}; my $err = $gz->flush($buf, Z_FINISH); - $err == Z_OK ? $buf : gzip_fail($ctx, $err); + ($err == Z_OK) ? $buf : gzip_fail($ctx, $err); } sub close {} # noop -- 2.44.0