-@echo off\r
-\r
-rem Written by David Charlap (shamino@writeme.com)\r
-rem\r
-rem There are two possible problems with this batch file. The emacs.bat batch\r
-rem file may not exist in all distributions. It is part of the GNU build of\r
-rem Emacs 20.4 (http://www.gnu.org/softare/emacs/windows.ntemacs.html) If you\r
-rem install Gnus with some other build, you may have to replace calls to\r
-rem %1\emacs.bat with something else.\r
-rem \r
-rem Also, the emacs.bat file that comes with Emacs does not accept more than 9\r
-rem parameters, so the attempts to compile the .texi files will fail. To\r
-rem fix that (at least on NT. I don't know about Win95), the following\r
-rem change should be made to emacs.bat:\r
-rem \r
-rem %emacs_dir%\bin\emacs.exe %1 %2 %3 %4 %5 %6 %7 %8 %9\r
-rem \r
-rem should become\r
-rem \r
-rem %emacs_dir%\bin\emacs.exe %*\r
-rem \r
-rem which will allow the batch file to accept an unlimited number of\r
-rem parameters.\r
+@echo OFF\r
+REM Change this to ON when debugging this batch file.\r
\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 .\r
rem Clear PWD so emacs doesn't get confused\r
set GNUS_PWD_SAVE=%PWD%\r
set PWD=\r
+set ERROR=:\r
+REM set pause=\r
\r
-if "%1" == "" goto usage\r
-\r
-rem Directory where the info files are installed\r
-set GNUS_INFO_DIR=%1\info\r
+if %1p == p goto usage\r
\r
+echo * Installing Gnus on your system. Operating system:\r
+ver\r
rem Emacs 20.7 no longer includes emacs.bat. Use emacs.exe if the batch file is\r
rem not present -- this also fixes the problem about too many parameters on Win9x.\r
-set emacs=emacs.exe\r
-if exist %1\bin\emacs.bat set emacs=emacs.bat\r
-set EMACSBATCH=call %1\bin\%emacs% -no-site-file -batch -q\r
+if exist %1\emacs.bat goto ebat\r
+if exist %1\emacs.exe goto eexe\r
+if exist %1\xemacs.exe goto xemacs\r
+goto noemacs\r
+\r
+:ebat\r
+set EMACS=emacs.bat\r
+echo.\r
+echo ***************************************************************************\r
+echo * Using emacs.bat (If you've got Emacs 20.3 or higher please remove\r
+echo * Emacs.bat, it isn't needed anymore.)\r
+echo ***************************************************************************\r
+echo.\r
+goto emacs\r
+\r
+:eexe\r
+set EMACS=emacs.exe\r
+echo.\r
+echo ***************************************************************************\r
+echo * Using emacs.exe\r
+echo ***************************************************************************\r
+echo.\r
+goto emacs\r
+\r
+:emacs\r
+if not "%2" == "/copy" goto emacsnocopy\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
+set GNUS_INFO_DIR=%1\..\info\r
+set GNUS_LISP_DIR=%1\..\site-lisp\gnus\lisp\r
+set GNUS_ETC_DIR=%1\..\site-lisp\gnus\etc\r
+goto lisp\r
\r
+:xemacs\r
+set EMACS=xemacs.exe\r
+if not "%2" == "/copy" goto xemacsnocopy\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
+set GNUS_LISP_DIR=%1\..\..\site-packages\lisp\gnus\r
+set GNUS_ETC_DIR=%1\..\..\site-packages\etc\r
+echo.\r
+echo ***************************************************************************\r
+echo * Using xemacs.exe\r
+echo ***************************************************************************\r
+echo.\r
+goto lisp\r
+\r
+:lisp\r
+if "%pause%" == "pause" pause\r
+set EMACSBATCH=call %1\%EMACS% %EMACS_ARGS%\r
cd lisp\r
+if exist gnus-load.el attrib -r gnus-load.el\r
+if exist gnus-load.el del gnus-load.el\r
+echo.\r
+echo * Stand by while generating autoloads.\r
+echo.\r
+%EMACSBATCH% -l ./dgnushack.el -f dgnushack-make-cus-load .\r
+if ErrorLevel 1 set ERROR=make-cus-load\r
+%EMACSBATCH% -l ./dgnushack.el -f dgnushack-make-auto-load .\r
+if ErrorLevel 1 set ERROR=%ERROR%,make-auto-load\r
+%EMACSBATCH% -l ./dgnushack.el -f dgnushack-make-load\r
+if ErrorLevel 1 set ERROR=%ERROR%,make-load\r
+echo.\r
+echo * Stand by while compiling lisp files.\r
+echo.\r
%EMACSBATCH% -l ./dgnushack.el -f dgnushack-compile\r
-if not "%2" == "/copy" goto info\r
-attrib -r %1\lisp\gnus\*\r
-copy *.el* %1\lisp\gnus\r
+if ErrorLevel 1 set ERROR=%ERROR%,compile\r
\r
-:info\r
-set EMACSINFO=%EMACSBATCH% -l infohack.el -f batch-makeinfo\r
+if not "%2" == "/copy" goto infotest\r
+echo.\r
+echo * Stand by while copying lisp files.\r
+echo.\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
+\r
+:infotest\r
cd ..\texi\r
-%EMACSINFO% message.texi\r
+if exist sieve attrib -r sieve\r
+if exist sieve del sieve\r
+\r
+echo * Checking if makeinfo is available...\r
+makeinfo sieve.texi\r
+if exist sieve goto minfo\r
+echo * No makeinfo found, using infohack.el.\r
+set EMACSINFO=%EMACSBATCH% -l infohack.el -f batch-makeinfo\r
+echo.\r
+echo ***************************************************************************\r
+echo * Using infohack.el, if you've got makeinfo.exe put it in PATH.\r
+echo ***************************************************************************\r
+echo.\r
+goto info\r
+\r
+:minfo\r
+set EMACSINFO=makeinfo\r
+echo.\r
+echo ***************************************************************************\r
+echo * Using makeinfo\r
+echo ***************************************************************************\r
+echo.\r
+goto info\r
+\r
+:info\r
+if "%pause%" == "pause" pause\r
+echo.\r
+echo * Stand by while generating info files.\r
+echo.\r
%EMACSINFO% emacs-mime.texi\r
+if ErrorLevel 1 set ERROR=%ERROR%,emacs-mime.texi\r
%EMACSINFO% gnus.texi\r
-if not "%2" == "/copy" goto done\r
-copy gnus %GNUS_INFO_DIR%\r
-copy gnus-? %GNUS_INFO_DIR%\r
-copy gnus-?? %GNUS_INFO_DIR%\r
-copy message %GNUS_INFO_DIR%\r
-copy message-? %GNUS_INFO_DIR%\r
-copy emacs-mime %GNUS_INFO_DIR%\r
-copy sieve %GNUS_INFO_DIR%\r
-copy pgg %GNUS_INFO_DIR%\r
-echo Maybe you should add the following line to %GNUS_INFO_DIR%\dir:\r
+if ErrorLevel 1 set ERROR=%ERROR%,gnus.texi\r
+%EMACSINFO% sieve.texi\r
+if ErrorLevel 1 set ERROR=%ERROR%,sieve.texi\r
+%EMACSINFO% pgg.texi\r
+if ErrorLevel 1 set ERROR=%ERROR%,pgg.texi\r
+%EMACSINFO% message.texi\r
+if ErrorLevel 1 set ERROR=%ERROR%,message.texi\r
+%EMACSINFO% sasl.texi\r
+if ErrorLevel 1 set ERROR=%ERROR%,sasl.texi\r
+\r
+if not "%2" == "/copy" goto nocopy\r
+if not exist %GNUS_INFO_DIR%\nul mkdir %GNUS_INFO_DIR%\r
+\r
echo.\r
-echo * PGG: (pgg). Emacs interface to various PGP implementations.\r
-echo * Sieve: (sieve). Managing Sieve scripts in
projects / gnus / blobdiff