awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-09-06 15:13:33 -05:00
Code Issues Packages Projects Releases Wiki Activity

Fix doom/help-search-loaded-files

Browse Source 
Would throw a string type error because load-history doesn't only
contain sublists whose CARs are strings.
This commit is contained in:
Henrik Lissner
2020-05-19 17:33:57 -04:00
parent 265e80123a
commit 92b98bed11
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
core/autoload/help.el
View File

@@ -660,8 +660,9 @@ Uses the symbol at point or the current selection, if available."
Uses the symbol at point or the current selection, if available."
(interactive
(list (doom--help-search-prompt "Search loaded files: ")))
(let ((paths (cl-loop for (file . _) in load-history
for filebase = (file-name-sans-extension file)
if (file-exists-p! (format "%s.el" filebase))
collect it)))
(doom--help-search paths query "Search loaded files: ")))
(doom--help-search
(cl-loop for (file . _) in (cl-remove-if-not #'stringp load-history :key #'car)
for filebase = (file-name-sans-extension file)
if (file-exists-p! (format "%s.el" filebase))
collect it)
query "Search loaded files: "))