Emacs: add fallback for init-file when ignored
Alan Pearce alan@alanpearce.co.uk
Fri, 25 Apr 2014 20:08:41 +0100
1 files changed, 3 insertions(+), 2 deletions(-)
jump to
M tag-emacs/emacs.d/init.el → tag-emacs/emacs.d/init.el
@@ -20,9 +20,10 @@ ;;;; Environment & Location (defvar *init-file* - (when user-init-file + (let ((init-file (or user-init-file + (expand-file-name "init.el" user-emacs-directory)))) (expand-file-name "init.el" - (file-name-directory (file-truename user-init-file)))) + (file-name-directory (file-truename init-file)))) "Where the emacs init file really is, passing through symlinks.") ;;;; Package Management