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.
Unified · Split
| @@ -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 @@ · 18 unmodified lines | ||
| 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 = (); |