In perl.git, the branch blead has been updated

<http://perl5.git.perl.org/perl.git/commitdiff/bb4830e68bcd02036b9e04bea8476c8f4583e3ba?hp=d0d6d4ceec7b551df4a20f5eea6133da85eba732>

- Log -----------------------------------------------------------------
commit bb4830e68bcd02036b9e04bea8476c8f4583e3ba
Author: Lukas Mai <l....@web.de>
Date:   Tue Jun 6 23:01:35 2017 +0200

    buildtoc: explicitly accept -q (RT #131520)
    
    Normally the default behavior of Getopt::Long is to enable auto_abbrev,
    which allows '--quiet' to be spelled as '-q', but not when
    POSIXLY_CORRECT is set:
    
     $ POSIXLY_CORRECT=1 make
     ...
     ./perl -Ilib -I. -f pod/buildtoc -q
     Unknown option: q
     pod/buildtoc: Usage: pod/buildtoc [--quiet]
     make: *** [makefile:405: pod/perltoc.pod] Error 255
-----------------------------------------------------------------------

Summary of changes:
 pod/buildtoc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pod/buildtoc b/pod/buildtoc
index 75bdcf271a..8837f8e388 100644
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -18,7 +18,7 @@ BEGIN {
 }
 
 die "$0: Usage: $0 [--quiet]\n"
-    unless GetOptions (quiet => \$Quiet) && !@ARGV;
+    unless GetOptions ('q|quiet' => \$Quiet) && !@ARGV;
 
 my $state = get_pod_metadata(0, sub { warn @_ if @_ }, 'pod/perltoc.pod');
 

--
Perl5 Master Repository

Reply via email to