Index: emacs/lisp/loadup.el
diff -c emacs/lisp/loadup.el:1.138 emacs/lisp/loadup.el:1.139
*** emacs/lisp/loadup.el:1.138 Fri May 6 11:25:26 2005
--- emacs/lisp/loadup.el Sun Jun 12 12:47:26 2005
***************
*** 320,326 ****
(setq name (concat (downcase (substring name 0 (match-beginning 0)))
"-"
(substring name (match-end 0)))))
! (if (eq system-type 'ms-dos)
(message "Dumping under the name emacs")
(message "Dumping under names emacs and %s" name)))
(condition-case ()
--- 320,326 ----
(setq name (concat (downcase (substring name 0 (match-beginning 0)))
"-"
(substring name (match-end 0)))))
! (if (memq system-type '(ms-dos windows-nt cygwin))
(message "Dumping under the name emacs")
(message "Dumping under names emacs and %s" name)))
(condition-case ()
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
