diff options
| author | Xue Fuqiao | 2014-01-02 16:47:40 +0800 |
|---|---|---|
| committer | Xue Fuqiao | 2014-01-02 16:47:40 +0800 |
| commit | 5cd63720ce8b6da6fa722ec18c2c4087a6a0afd2 (patch) | |
| tree | 6a0a6f7ba9013b039f9f5ff92f50fd4520081ec3 /admin/check-doc-strings | |
| parent | b483c5703d31a7931c701817fc6dcb61259abb82 (diff) | |
| download | emacs-5cd63720ce8b6da6fa722ec18c2c4087a6a0afd2.tar.gz emacs-5cd63720ce8b6da6fa722ec18c2c4087a6a0afd2.zip | |
* admin/check-doc-strings: Replace `perl -w' with `use warnings;'.
Diffstat (limited to 'admin/check-doc-strings')
| -rwxr-xr-x | admin/check-doc-strings | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/admin/check-doc-strings b/admin/check-doc-strings index c69ff47ebfb..a0b5acb623f 100755 --- a/admin/check-doc-strings +++ b/admin/check-doc-strings | |||
| @@ -1,11 +1,12 @@ | |||
| 1 | : #-*- Perl -*- | 1 | : #-*- Perl -*- |
| 2 | eval 'exec perl -w -S $0 ${1+"$@"}' # Portability kludge | 2 | eval 'exec perl -S $0 ${1+"$@"}' # Portability kludge |
| 3 | if 0; | 3 | if 0; |
| 4 | 4 | ||
| 5 | # Author: Martin Buchholz | 5 | # Author: Martin Buchholz |
| 6 | # This program is in the public domain. | 6 | # This program is in the public domain. |
| 7 | 7 | ||
| 8 | use strict; | 8 | use strict; |
| 9 | use warnings; | ||
| 9 | use POSIX; | 10 | use POSIX; |
| 10 | 11 | ||
| 11 | (my $myName = $0) =~ s@.*/@@; my $usage=" | 12 | (my $myName = $0) =~ s@.*/@@; my $usage=" |