Browse code
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>
(cherry picked from commit 3239382aefd0f5fa9ffd1509ccaedd59a54ec9af)
Signed-off-by: Timothy Gu <timothygu99@gmail.com>
Stefano Sabatini authored on 2012/08/12 17:35:03Showing 1 changed files
| ... | ... |
@@ -1,4 +1,4 @@ |
| 1 |
-#! /usr/bin/perl -w |
|
| 1 |
+#! /usr/bin/perl |
|
| 2 | 2 |
|
| 3 | 3 |
# Copyright (C) 1999, 2000, 2001 Free Software Foundation, Inc. |
| 4 | 4 |
|
| ... | ... |
@@ -23,6 +23,8 @@ |
| 23 | 23 |
# markup to Perl POD format. It's intended to be used to extract |
| 24 | 24 |
# something suitable for a manpage from a Texinfo document. |
| 25 | 25 |
|
| 26 |
+use warnings; |
|
| 27 |
+ |
|
| 26 | 28 |
$output = 0; |
| 27 | 29 |
$skipping = 0; |
| 28 | 30 |
%sects = (); |