Fix directory test for Windows 9x/ME. From Michael

Schierl <schierlm-public@gmx.de> (tiny change).

diff --git a/ChangeLog b/ChangeLog
index 3cc2699..a502780 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2004-03-01  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * make.bat: Fix directory test for Windows 9x/ME.  From Michael
+       Schierl <schierlm-public@gmx.de> (tiny change).
+
 2004-01-07  Hiroshi Fujishima  <pooh@nature.tsukuba.ac.jp>
 
        * etc/gnus-tut.txt: `G m' instead of `G V' (tiny patch).

diff --git a/make.bat b/make.bat
index e091bd9..75418da 100644 (file)
--- a/make.bat
+++ b/make.bat
@@ -1,6 +1,6 @@
 @echo off\r
 \r
-rem Written by Frank Schmitt <ich@frank-schmitt.net>\r
+rem Written by Frank Schmitt (ich@frank-schmitt.net)\r
 rem based on the work by David Charlap (shamino@writeme.com)\r
 rem .\r
 rem Clear PWD so emacs doesn't get confused\r
@@ -38,8 +38,8 @@ goto emacs
 \r
 :emacs\r
 if not "%2" == "/copy" goto emacsnocopy\r
-if not exist %1\..\site-lisp mkdir %1\..\site-lisp\r
-if not exist %1\..\site-lisp\gnus mkdir %1\..\site-lisp\gnus\r
+if not exist %1\..\site-lisp\nul mkdir %1\..\site-lisp\r
+if not exist %1\..\site-lisp\gnus\nul mkdir %1\..\site-lisp\gnus\r
 if not exist %1\..\site-lisp\subdirs.el set subdirwarning=yes\r
 :emacsnocopy\r
 set EMACS_ARGS=-batch -q -no-site-file\r
@@ -51,10 +51,10 @@ goto lisp
 :xemacs\r
 set EMACS=xemacs.exe\r
 if not "%2" == "/copy" goto xemacsnocopy\r
-if not exist %1\..\..\site-packages\ mkdir %1\..\..\site-packages\\r
-if not exist %1\..\..\site-packages\info mkdir %1\..\..\site-packages\info\r
-if not exist %1\..\..\site-packages\lisp mkdir %1\..\..\site-packages\lisp\r
-if not exist %1\..\..\site-packages\etc mkdir %1\..\..\site-packages\etc\r
+if not exist %1\..\..\site-packages\nul mkdir %1\..\..\site-packages\\r
+if not exist %1\..\..\site-packages\info\nul mkdir %1\..\..\site-packages\info\r
+if not exist %1\..\..\site-packages\lisp\nul mkdir %1\..\..\site-packages\lisp\r
+if not exist %1\..\..\site-packages\etc\nul mkdir %1\..\..\site-packages\etc\r
 :xemacsnocopy\r
 set EMACS_ARGS=-batch -no-autoloads\r
 set GNUS_INFO_DIR=%1\..\..\site-packages\info\r
@@ -90,7 +90,7 @@ if not "%2" == "/copy" goto infotest
 echo.\r
 echo Stand by while copying lisp files.\r
 echo.\r
-if not exist %GNUS_LISP_DIR% mkdir %GNUS_LISP_DIR%\r
+if not exist %GNUS_LISP_DIR%\nul mkdir %GNUS_LISP_DIR%\r
 xcopy /R /Q /Y *.el* %GNUS_LISP_DIR%\r
 if ErrorLevel 1 set ERROR=%ERROR%,copy-lisp\r
 goto infotest\r
@@ -134,7 +134,7 @@ if ErrorLevel 1 set ERROR=%ERROR%,pgg.texi
 if ErrorLevel 1 set ERROR=%ERROR%,message.texi\r
 \r
 if not "%2" == "/copy" goto nocopy\r
-if not exist %GNUS_INFO_DIR% mkdir %GNUS_INFO_DIR%\r
+if not exist %GNUS_INFO_DIR%\nul mkdir %GNUS_INFO_DIR%\r
 \r
 echo.\r
 echo Stand by while copying info files.\r
@@ -172,13 +172,13 @@ cd ..\etc
 echo.\r
 echo Stand by while copying etc files.\r
 echo.\r
-if not exist %GNUS_ETC_DIR% mkdir %GNUS_ETC_DIR%\r
+if not exist %GNUS_ETC_DIR%\nul mkdir %GNUS_ETC_DIR%\r
 xcopy /R /Q /Y gnus-tut.txt %GNUS_ETC_DIR%\r
 if ErrorLevel 1 set ERROR=%ERROR%,copy-etc-gnus-tut-txt\r
-if not exist %GNUS_ETC_DIR%\gnus mkdir %GNUS_ETC_DIR%\gnus\r
+if not exist %GNUS_ETC_DIR%\gnus\nul mkdir %GNUS_ETC_DIR%\gnus\r
 xcopy /R /Q /Y .\gnus\* %GNUS_ETC_DIR%\gnus\\r
 if ErrorLevel 1 set ERROR=%ERROR%,copy-etc-gnus-*\r
-if not exist %GNUS_ETC_DIR%\smilies mkdir %GNUS_ETC_DIR%\smilies\r
+if not exist %GNUS_ETC_DIR%\smilies\nul mkdir %GNUS_ETC_DIR%\smilies\r
 xcopy /R /Q /Y .\smilies\* %GNUS_ETC_DIR%\smilies\\r
 if ErrorLevel 1 set ERROR=%ERROR%,copy-etc-smilies-*\r
 goto warnings\r