changeset 24138:8ca6326a79e1

(command-line): [windows-nt]: Check for existence of .emacs file so as to notice .emacs.el or .emacs.elc and use them in preference to _emacs.
author Andrew Innes <andrewi@gnu.org>
date Fri, 22 Jan 1999 15:12:59 +0000
parents 0fae13f12fab
children 2b3e32c0fc18
files lisp/startup.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/startup.el	Fri Jan 22 14:03:06 1999 +0000
+++ b/lisp/startup.el	Fri Jan 22 15:12:59 1999 +0000
@@ -689,7 +689,7 @@
 			   ((eq system-type 'ms-dos)
 			    (concat "~" init-file-user "/_emacs"))
 			   ((eq system-type 'windows-nt)
-			    (if (file-exists-p "~/.emacs") 
+			    (if (directory-files "~" nil "^\.emacs\\(\.elc?\\)?$")
 				"~/.emacs"
 			      "~/_emacs"))
 			   ((eq system-type 'vax-vms)