[elpa] externals/consult c98dc3bc77: consult--directory-prompt: Introduce separate history variable

[ELPA Syncer]

branch: externals/consult
commit c98dc3bc772dcc549312d9c114c5c174e18cecf8
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    consult--directory-prompt: Introduce separate history variable
    
    We should not reuse the file-name-history, since this history should
    only include single filenames and not comma separated filenames as
    produced by completing-read-multiple.
---
 consult.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/consult.el b/consult.el
index 9887378a31..8e30001ba6 100644
--- a/consult.el
+++ b/consult.el
@@ -455,6 +455,7 @@ Used by `consult-completion-in-region', `consult-yank' and 
`consult-history'.")
 ;;;; Input history variables
 
 (defvar consult--keep-lines-history nil)
+(defvar consult--path-history nil)
 (defvar consult--grep-history nil)
 (defvar consult--find-history nil)
 (defvar consult--man-history nil)
@@ -751,7 +752,7 @@ asked for the directories or files to search via
                         (let ((this-command this-command))
                           (completing-read-multiple "Directories or files: "
                                                     
#'completion-file-name-table
-                                                    nil t nil 
'file-name-history)))
+                                                    nil t nil 
'consult--path-history)))
                  ((and `(,p) (guard (file-directory-p p))) p)
                  (ps (setq paths (mapcar (lambda (p)
                                            (file-relative-name 
(expand-file-name p)))