Ver código fonte

doc/texi2pod: add "use warnings" directive

The script was previously run with perl -w through the shebang
command. Now that the script is executed through direct perl invocation
the -w in the shebang command is ignored. This patch re-enables "use
warnings" whatever way the script is invoked.

Idea-By: jamal <jamrial@gmail.com>
Stefano Sabatini 13 anos atrás
pai
commit
3239382aef
1 arquivos alterados com 3 adições e 1 exclusões
  1. 3 1
      doc/texi2pod.pl

+ 3 - 1
doc/texi2pod.pl

@@ -1,4 +1,4 @@
-#! /usr/bin/perl -w
+#! /usr/bin/perl
 
 
 #   Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.
 #   Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc.
 
 
@@ -23,6 +23,8 @@
 # markup to Perl POD format.  It's intended to be used to extract
 # markup to Perl POD format.  It's intended to be used to extract
 # something suitable for a manpage from a Texinfo document.
 # something suitable for a manpage from a Texinfo document.
 
 
+use warnings;
+
 $output = 0;
 $output = 0;
 $skipping = 0;
 $skipping = 0;
 %sects = ();
 %sects = ();