This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
make_ext.pl: fix operator precedence error from b4c079ca5
authorTony Cook <tony@develop-help.com>
Sun, 22 Nov 2015 23:37:47 +0000 (10:37 +1100)
committerTony Cook <tony@develop-help.com>
Sun, 22 Nov 2015 23:37:47 +0000 (10:37 +1100)
make_ext.pl

index 223f67e..0745049 100644 (file)
@@ -616,7 +616,7 @@ sub just_pm_to_blib {
     my ($first) = $mname =~ /^([^:]+)/;
 
     my $pm_to_blib = IS_VMS ? 'pm_to_blib.ts' : 'pm_to_blib';
-    my $silent = defined $ENV{MAKEFLAGS} and $ENV{MAKEFLAGS} =~ /\b(s|silent|quiet)\b/;
+    my $silent = defined $ENV{MAKEFLAGS} && $ENV{MAKEFLAGS} =~ /\b(s|silent|quiet)\b/;
 
     foreach my $leaf (<*>) {
         if (-d $leaf) {