X-Git-Url: https://code.delx.au/gnu-emacs/blobdiff_plain/c8d3a25c0981020e1b8aa3bf96a4a0059be82431..56f5ea17f19bfb07e263dd2d59a3c61b652fcc3d:/build-aux/update-subdirs

diff --git a/build-aux/update-subdirs b/build-aux/update-subdirs
index e20e0da6e1..d544b22695 100755
--- a/build-aux/update-subdirs
+++ b/build-aux/update-subdirs
@@ -1,8 +1,8 @@
 #!/bin/sh
 # Write into $1/subdirs.el a list of subdirs of directory $1.
 
-# Copyright (C) 1994-1995, 1997, 1999, 2001-2012
-#   Free Software Foundation, Inc.
+# Copyright (C) 1994-1995, 1997, 1999, 2001-2015 Free Software
+# Foundation, Inc.
 
 # This file is part of GNU Emacs.
 
@@ -20,7 +20,7 @@
 # along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.
 
 
-cd $1
+cd "$1" || exit 1
 for file in *; do
     case $file in
 	*.elc | *.el | term | RCS | CVS | Old | . | .. | =* | *~ | *.orig | *.rej)
@@ -49,8 +49,8 @@ else
 ;; no-byte-compile: t
 ;; End:" > subdirs.el~
   if cmp "subdirs.el" "subdirs.el~" >/dev/null 2>&1; then
-    :; # echo "subdirs.el unchanged";
+    rm subdirs.el~
   else
-  mv subdirs.el~ subdirs.el
+    mv subdirs.el~ subdirs.el
   fi
 fi