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

Merge pull request #1998 from rgrinberg/fix-autoload-cookie

Browse Source 
Fix autoload cookie for doom/help-search-loaded-files
This commit is contained in:
Henrik Lissner
2019-11-01 13:09:28 -04:00
committed by GitHub
parent 8a999c6ae1 7900cef7da
commit 7a10a68f4e
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
core/autoload/help.el
View File

@ -614,7 +614,7 @@ Uses the symbol at point or the current selection, if available."
(mapconcat
#'shell-quote-argument
(cond ((executable-find "rg")
`("rg" "--search-zip" "--no-heading" "--color=never"
`("rg" "-L" "--search-zip" "--no-heading" "--color=never"
,query ,@(cl-remove-if-not #'file-directory-p load-path)))
((executable-find "ag")
`("ag" "--search-zip" "--nogroup" "--nocolor"
@ -623,7 +623,7 @@ Uses the symbol at point or the current selection, if available."
" ")))
;; TODO factor our the duplicate code between this and the above
;;;autoload
;;;###autoload
(defun doom/help-search-loaded-files (query)
"Perform a text search on your `load-path'.
Uses the symbol at point or the current selection, if available."
@ -645,7 +645,7 @@ Uses the symbol at point or the current selection, if available."
#'shell-quote-argument
(let ((search (elisp-refs--loaded-paths)))
(cond ((executable-find "rg")
`("rg" "--search-zip" "--no-heading" "--color=never"
`("rg" "-L" "--search-zip" "--no-heading" "--color=never"
,query ,@(cl-remove-if-not #'file-directory-p search)))
((executable-find "ag")
`("ag" "--search-zip" "--nogroup" "--nocolor"