# HG changeset patch
# User Andrew Innes <andrewi@gnu.org>
# Date 917017979 0
# Node ID 8ca6326a79e1a0ccbb318bf9b7239808e0332764
# Parent  0fae13f12fab2acddb3ac41c9722bdafdbb7f3af
(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.

diff -r 0fae13f12fab -r 8ca6326a79e1 lisp/startup.el
--- 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)