[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 0c3f53916e 3/3: Revert 3d0fc6a8c6a74b21ca854b86
From: |
ELPA Syncer |
Subject: |
[elpa] externals/consult 0c3f53916e 3/3: Revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85 |
Date: |
Sat, 24 Aug 2024 06:57:38 -0400 (EDT) |
branch: externals/consult
commit 0c3f53916ea0db0c472c0a0c620a85cc1b00caf2
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Revert 3d0fc6a8c6a74b21ca854b8632b3f58e0e513b85
---
consult.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/consult.el b/consult.el
index 699798cf91..e382893f7a 100644
--- a/consult.el
+++ b/consult.el
@@ -817,10 +817,9 @@ asked for the directories or files to search via
(lambda ()
(setq-local completion-ignore-case ignore-case)
(set-syntax-table
minibuffer-local-filename-syntax))
- (mapcar #'substitute-in-file-name
- (completing-read-multiple "Directories or
files: "
-
#'completion-file-name-table
- nil t def
'consult--path-history def)))))
+ (completing-read-multiple "Directories or files: "
+
#'completion-file-name-table
+ nil t def
'consult--path-history def))))
((and `(,p) (guard (file-directory-p p))) p)
(ps (setq paths (mapcar (lambda (p)
(file-relative-name
(expand-file-name p)))