awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

feat(eval): set load-true-file-name & buffer-file-truename

Browse Source 
So they are available in evaluated contexts.
This commit is contained in:
Henrik Lissner
2022-01-27 03:50:52 +01:00
parent 09098bed48
commit 7290f85cfd
2 changed files with 10 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
modules/lang/emacs-lisp/autoload.el
View File

@ -11,11 +11,11 @@ to a pop up buffer."
(string-trim-right
(condition-case-unless-debug e
(let ((result
(let ((buffer-file-name
(buffer-file-name (buffer-base-buffer)))
(doom--current-module
(ignore-errors (doom-module-from-path buffer-file-name)))
(debug-on-error t))
(let* ((buffer-file-name (buffer-file-name (buffer-base-buffer)))
(buffer-file-truename (file-truename buffer-file-name))
(doom--current-module
(ignore-errors (doom-module-from-path buffer-file-name)))
(debug-on-error t))
(eval (read (format "(progn %s)"
(buffer-substring-no-properties beg end)))
lexical-binding))))