diff options
| author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2024-06-22 02:26:08 +0100 |
|---|---|---|
| committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2024-06-22 02:26:08 +0100 |
| commit | a89353eeb8727e31baa6093817be37583a34c41e (patch) | |
| tree | 8267afbbd58d20cad7a330fb7a67393b998cd13e /Emacs/.config/emacs/elisp/search.el | |
| parent | 3ef303fb670303571999aa5b9765ea91ad02ce56 (diff) | |
| download | dotfiles-a89353eeb8727e31baa6093817be37583a34c41e.tar.gz dotfiles-a89353eeb8727e31baa6093817be37583a34c41e.tar.bz2 dotfiles-a89353eeb8727e31baa6093817be37583a34c41e.zip | |
Tons of changes
Diffstat (limited to 'Emacs/.config/emacs/elisp/search.el')
| -rw-r--r-- | Emacs/.config/emacs/elisp/search.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Emacs/.config/emacs/elisp/search.el b/Emacs/.config/emacs/elisp/search.el index 922d9a6..4b0097c 100644 --- a/Emacs/.config/emacs/elisp/search.el +++ b/Emacs/.config/emacs/elisp/search.el @@ -42,7 +42,8 @@ Returns a list of files with the directory preprended to them." names))) (defun +search/get-all-candidates () - (string-join + (cl-reduce + #'(lambda (x y) (append x y)) (mapcar #'(lambda (directory) (+search/get-candidates (expand-file-name directory))) +search/directories))) @@ -58,8 +59,7 @@ Returns a list of files with the directory preprended to them." (string-join (mapcar #'(lambda (x) (concat "\"" x "\"")) - (cl-remove-if #'directory-name-p (+search/get-all-candidates))) - " ")) + (cl-remove-if #'directory-name-p (+search/get-all-candidates))))) (defun +search/search-all () (interactive) |