From a89353eeb8727e31baa6093817be37583a34c41e Mon Sep 17 00:00:00 2001 From: Aryadev Chavali Date: Sat, 22 Jun 2024 02:26:08 +0100 Subject: Tons of changes --- Emacs/.config/emacs/elisp/search.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Emacs/.config/emacs/elisp/search.el') 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) -- cgit v1.2.3-13-gbd6f