[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/startup.el [lexbind]
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/startup.el [lexbind] |
Date: |
Wed, 06 Oct 2004 01:44:17 -0400 |
Index: emacs/lisp/startup.el
diff -c emacs/lisp/startup.el:1.298.2.9 emacs/lisp/startup.el:1.298.2.10
*** emacs/lisp/startup.el:1.298.2.9 Thu Sep 16 00:12:21 2004
--- emacs/lisp/startup.el Wed Oct 6 05:21:51 2004
***************
*** 810,818 ****
((eq system-type 'ms-dos)
(concat "~" init-file-user "/_emacs"))
((eq system-type 'windows-nt)
(if (directory-files "~" nil
"^\\.emacs\\(\\.elc?\\)?$")
"~/.emacs"
! "~/_emacs"))
((eq system-type 'vax-vms)
"sys$login:.emacs")
(t
--- 810,823 ----
((eq system-type 'ms-dos)
(concat "~" init-file-user "/_emacs"))
((eq system-type 'windows-nt)
+ ;; Prefer .emacs on Windows.
(if (directory-files "~" nil
"^\\.emacs\\(\\.elc?\\)?$")
"~/.emacs"
! ;; Also support _emacs for compatibility.
! (if (directory-files "~" nil
"^_emacs\\(\\.elc?\\)?$")
! "~/_emacs"
! ;; But default to .emacs if _emacs does not
exist.
! "~/.emacs")))
((eq system-type 'vax-vms)
"sys$login:.emacs")
(t
- [Emacs-diffs] Changes to emacs/lisp/startup.el [lexbind],
Miles Bader <=