Update ../site-lisp/subdirs.el when needed.

2 files changed, 15 insertions, 2 deletions

diff --git a/nt/ChangeLog b/nt/ChangeLog
index a74e27e03c0..3757dd81bdf 100644
--- a/nt/ChangeLog
+++ b/nt/ChangeLog
@@ -1,3 +1,7 @@
+2007-01-31  Juanma Barranquero  <lekktu@gmail.com>
+
+	* configure.bat: Update ../site-lisp/subdirs.el when needed.
+
 2007-01-30  Juanma Barranquero  <lekktu@gmail.com>
 
 	* subdirs.el: Add "no-byte-compile: t" local variable.
diff --git a/nt/configure.bat b/nt/configure.bat
index ad44416651a..1223f7e861d 100755
--- a/nt/configure.bat
+++ b/nt/configure.bat
@@ -519,8 +519,17 @@ del config.settings
 

 Rem Some people use WinZip which doesn't create empty directories!

 if not exist ..\site-lisp\nul mkdir ..\site-lisp\

-if not exist ..\site-lisp\subdirs.el copy subdirs.el ..\site-lisp\subdirs.el

-

+Rem Update subdirs.el only if it is different or fc.exe doesn't work.

+if exist foo.bar del foo.bar

+fc /b foo.bar foo.bar >nul 2>&1

+if not errorlevel 2 goto doUpdateSubdirs

+fc /b subdirs.el ..\site-lisp\subdirs.el >nul 2>&1

+if not errorlevel 1 goto dontUpdateSubdirs

+:doUpdateSubdirs

+if exist ..\site-lisp\subdirs.el del ..\site-lisp\subdirs.el

+copy subdirs.el ..\site-lisp\subdirs.el

+

+:dontUpdateSubdirs

 echo.

 echo Emacs successfully configured.

 echo Emacs successfully configured. >>config.log