Emacs: Simplify search for init file
Alan Pearce alan@alanpearce.eu
Fri, 04 Aug 2017 15:29:47 +0200
1 files changed, 1 insertions(+), 4 deletions(-)
jump to
M emacs/.emacs.d/init.el → emacs/.emacs.d/init.el
@@ -1425,10 +1425,7 @@ ;; ** Misc ;; #+BEGIN_SRC emacs-lisp (defvar *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 init-file)))) + (file-truename user-init-file) "Where the emacs init file really is, passing through symlinks.") (set-register ?e `(file . ,*init-file*))