[Emacs-diffs] trunk r115829: * admin/check-doc-strings: Replace `perl -w' with `use warnings; '.

[Xue Fuqiao]

------------------------------------------------------------
revno: 115829
revision-id: address@hidden
parent: address@hidden
committer: Xue Fuqiao <address@hidden>
branch nick: trunk
timestamp: Thu 2014-01-02 16:47:40 +0800
message:
  * admin/check-doc-strings: Replace `perl -w' with `use warnings;'.
modified:
  admin/ChangeLog                changelog-20091113204419-o5vbwnq5f7feedwu-2226
  admin/admin.el                 admin.el-20091113204419-o5vbwnq5f7feedwu-2254
  admin/check-doc-strings        
checkdocstrings-20091113204419-o5vbwnq5f7feedwu-2206

=== modified file 'admin/ChangeLog'
--- a/admin/ChangeLog   2014-01-01 07:43:34 +0000
+++ b/admin/ChangeLog   2014-01-02 08:47:40 +0000
@@ -1,3 +1,7 @@
+2014-01-02  Xue Fuqiao  <address@hidden>
+
+       * check-doc-strings: Replace `perl -w' with `use warnings;'.
+
 2013-12-30  Glenn Morris  <address@hidden>
 
        * admin.el (manual-html-fix-headers, manual-html-fix-index-1):

=== modified file 'admin/admin.el'
--- a/admin/admin.el    2014-01-01 07:43:34 +0000
+++ b/admin/admin.el    2014-01-02 08:47:40 +0000
@@ -218,6 +218,7 @@
                             (buffer-substring start (point))))
              '("efaq-w32")))))
 
+;; TODO report the progress
 (defun make-manuals (root &optional type)
   "Generate the web manuals for the Emacs webpage.
 ROOT should be the root of an Emacs source tree.

=== modified file 'admin/check-doc-strings'
--- a/admin/check-doc-strings   2013-01-03 02:36:29 +0000
+++ b/admin/check-doc-strings   2014-01-02 08:47:40 +0000
@@ -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) =~ address@hidden/@@; my $usage="