Add the "use strict;" and "use warnings;" pragmas.

* admin/make-emacs:
* admin/build-configs: Add the "use strict;" and "use warnings;" pragmas.

diff --git a/admin/ChangeLog b/admin/ChangeLog
index 16365c9..877c813 100644 (file)
--- a/admin/ChangeLog
+++ b/admin/ChangeLog
@@ -1,3 +1,8 @@
+2013-12-29  Xue Fuqiao  <xfq.free@gmail.com>
+
+       * make-emacs:
+       * build-configs: Add the "use strict;" and "use warnings;" pragmas.
+
 2013-12-28  Glenn Morris  <rgm@gnu.org>
 
        * admin.el (cusver-scan): Warn about missing :types.

diff --git a/admin/admin.el b/admin/admin.el
index 13d1126..571bd82 100644 (file)
--- a/admin/admin.el
+++ b/admin/admin.el
@@ -69,6 +69,7 @@ Optional argument DATE is the release date, default today."
     (user-error "Version not found in %s" file))
   (replace-match (format "%s" version) nil nil nil 1))
 
+;; TODO report the progress
 (defun set-version (root version)
   "Set Emacs version to VERSION in relevant files under ROOT.
 Root must be the root of an Emacs source tree."
@@ -161,6 +162,7 @@ Root must be the root of an Emacs source tree."
 
 
 ;; Note this makes some assumptions about form of short copyright.
+;; TODO report the progress
 (defun set-copyright (root copyright)
   "Set Emacs short copyright to COPYRIGHT in relevant files under ROOT.
 Root must be the root of an Emacs source tree."

diff --git a/admin/build-configs b/admin/build-configs
index 8b738be..ac0d219 100755 (executable)
--- a/admin/build-configs
+++ b/admin/build-configs
@@ -20,6 +20,8 @@
 
 
 require 5;
+use strict;
+use warnings;
 use Getopt::Long;
 use File::Basename;
 use Cwd;

diff --git a/admin/make-emacs b/admin/make-emacs
index 58295c9..2bc62f8 100755 (executable)
--- a/admin/make-emacs
+++ b/admin/make-emacs
@@ -21,6 +21,8 @@
 
 
 require 5;
+use strict;
+use warnings;
 use Getopt::Long;
 use File::Basename;
 use Cwd;