diff options
| author | Xue Fuqiao <xfq.free@gmail.com> | 2014-01-02 16:47:40 +0800 |
|---|---|---|
| committer | Xue Fuqiao <xfq.free@gmail.com> | 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.tar.bz2 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 @@ : #-*- Perl -*- -eval 'exec perl -w -S $0 ${1+"$@"}' # Portability kludge +eval 'exec perl -S $0 ${1+"$@"}' # Portability kludge if 0; # Author: Martin Buchholz # This program is in the public domain. use strict; +use warnings; use POSIX; (my $myName = $0) =~ s@.*/@@; my $usage=" |