Re: Building emacs 22.3 with djgpp 2.04 beta/Windows XP SP3 MCE 2005

[Eli Zaretskii <eliz@gnu.org>]

> From: Allan <mu8ja0i@earthlink.net>
> Date: Sun, 04 Jan 2009 01:55:36 -0600
> 
> I took your suggestions and was able to get an acceptable (but maybe not
> perfect) build. I had to run `make bootstrap' before I could get it to
> build

That's strange.  I suspect something went wrong when unpacking the
distro, or perhaps you inadvertently deleted all *.elc files in one of
your previous attempts.

> Directory ././erc Directory ././eshell Directory ././gnus Directory
> ././international Directory ././language Cannot open load file:
> composite make.exe[1]: *** [custom-deps] Error -1 make.exe[1]: Leaving
> directory `d:/emacs-22.3/lisp' make.exe: *** [bootstrap] Error 2

I don't think I tried a full bootstrap in Emacs 22.x for a long time;
it's possible that something broke since I last did.  The DJGPP build
of Emacs 22 was not maintained for several years, so it's quite
possible that it bit-rotted.

> D:\emacs-22.3> ...  
> But after this when I ran `make all' it did create
> the executables except for `movemail'. I am still having a problem with
> the `_emacs' initialization file even though I have set the `HOME'
> environment variable to the Windows XP convention default. It says user
> `dosuser' has no `HOME' environment variable defined.

That's a known problem in Emacs 22.3; it is corrected in the
development sources for the upcoming Emacs 23 release.  To fix this in
Emacs 22.3, apply the patch below, then byte-compile startup.el and
say "make install" in the top-level directory to rebuild Emacs.

(In case you didn't know, to byte-compile startup.el, chdir to the
`lisp' subdirectory and type "make startup.elc".)


Index: lisp/startup.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/startup.el,v
retrieving revision 1.520
diff -u -r1.520 startup.el
--- lisp/startup.el	4 Nov 2008 16:54:25 -0000	1.520
+++ lisp/startup.el	8 Nov 2008 13:13:33 -0000
@@ -977,13 +977,15 @@
 				   init-file-user)
 			   :error)
 	(if (file-directory-p (expand-file-name
-			       ;; We don't support ~USER on MS-Windows except
-			       ;; for the current user, and always load .emacs
-			       ;; from the current user's home directory (see
-			       ;; below).  So always check "~", even if invoked
-			       ;; with "-u USER", or if $USER or $LOGNAME are
-			       ;; set to something different.
-			       (if (eq system-type 'windows-nt)
+			       ;; We don't support ~USER on MS-Windows
+			       ;; and MS-DOS except for the current
+			       ;; user, and always load .emacs from
+			       ;; the current user's home directory
+			       ;; (see below).  So always check "~",
+			       ;; even if invoked with "-u USER", or
+			       ;; if $USER or $LOGNAME are set to
+			       ;; something different.
+			       (if (memq system-type '(windows-nt ms-dos))
 				   "~"
 				 (concat "~" init-file-user))))
 	    nil