From 32291eb6a3ff65cc35eeedbc333e173c1c274f08 Mon Sep 17 00:00:00 2001 From: Andrew Innes Date: Fri, 22 Jan 1999 15:12:59 +0000 Subject: [PATCH] (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. --- lisp/startup.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/startup.el b/lisp/startup.el index ccdc8804bd4..33e267ffe9f 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -689,7 +689,7 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." ((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) -- 2.39.2