aboutsummaryrefslogtreecommitdiffstats
path: root/admin/check-doc-strings
diff options
context:
space:
mode:
authorXue Fuqiao2014-01-02 16:47:40 +0800
committerXue Fuqiao2014-01-02 16:47:40 +0800
commit5cd63720ce8b6da6fa722ec18c2c4087a6a0afd2 (patch)
tree6a0a6f7ba9013b039f9f5ff92f50fd4520081ec3 /admin/check-doc-strings
parentb483c5703d31a7931c701817fc6dcb61259abb82 (diff)
downloademacs-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-xadmin/check-doc-strings3
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 -*-
2eval 'exec perl -w -S $0 ${1+"$@"}' # Portability kludge 2eval '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
8use strict; 8use strict;
9use warnings;
9use POSIX; 10use POSIX;
10 11
11(my $myName = $0) =~ s@.*/@@; my $usage=" 12(my $myName = $0) =~ s@.*/@@; my $usage="