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

fix: help(ful) reporting symbol's source as init.*.el

Browse Source 
Fix: #7958
This commit is contained in:
Henrik Lissner
2024-08-30 02:24:11 -04:00
parent 6671adc687
commit 7197ee65c7
1 changed files with 9 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/doom-start.el
View File

@ -394,7 +394,15 @@ If RETURN-P, return the message as a string instead of displaying it."
;; the next file it loads into `user-init-file'. ;; the next file it loads into `user-init-file'.
(setq user-init-file t) (setq user-init-file t)
(when init-file-name (when init-file-name
(load init-file-name 'noerror 'nomessage 'nosuffix)) (load init-file-name 'noerror 'nomessage 'nosuffix)
;; HACK: if `init-file-name' happens to be higher in
;; `load-history' than a symbol's actual definition,
;; `symbol-file' (and help/helpful buffers) will report the
;; source of a symbol as `init-file-name', rather than it's
;; true source. By removing this file from `load-history', no
;; one will make that mistake.
(setq load-history (delete (assoc init-file-name load-history)
load-history)))
;; If it's still `t', then it failed to load the profile initfile. ;; If it's still `t', then it failed to load the profile initfile.
;; This likely means the user has forgotten to run `doom sync'! ;; This likely means the user has forgotten to run `doom sync'!
(when (eq user-init-file t) (when (eq user-init-file t)