]> Sergey Matveev's repositories - public-inbox.git/commitdiff
test_common: fix xbail for Perl 5.16
authorEric Wong <e@80x24.org>
Tue, 20 Apr 2021 19:02:05 +0000 (00:02 +0500)
committerEric Wong <e@80x24.org>
Tue, 20 Apr 2021 20:49:34 +0000 (16:49 -0400)
Our use of `ref' was triggering ambiguity in older versions of
the Perl parser.

Reported-by: Konstantin Ryabitsev <konstantin@linuxfoundation.org>
Link: https://public-inbox.org/meta/20210420174912.h6d2yv7zu5xr4yfc@nitro.local/
lib/PublicInbox/TestCommon.pm

index 2627871a3c3f202f5c3d0eab75ee3ae42a9c694f..67fe6336d260b49b1b53eabb38b0e833f0799d70 100644 (file)
@@ -25,7 +25,7 @@ BEGIN {
        push @EXPORT, @methods;
 }
 
-sub xbail (@) { BAIL_OUT join(' ', map { ref ? (explain($_)) : ($_) } @_) }
+sub xbail (@) { BAIL_OUT join(' ', map { ref() ? (explain($_)) : ($_) } @_) }
 
 sub eml_load ($) {
        my ($path, $cb) = @_;