emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/consult f17db95 2/2: consult-completing-read-multiple:


From: ELPA Syncer
Subject: [elpa] externals/consult f17db95 2/2: consult-completing-read-multiple: Update history accordingly
Date: Fri, 9 Jul 2021 08:57:07 -0400 (EDT)

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

    consult-completing-read-multiple: Update history accordingly
---
 consult.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/consult.el b/consult.el
index c476a10..9badfbb 100644
--- a/consult.el
+++ b/consult.el
@@ -2273,8 +2273,8 @@ See `completing-read-multiple' for the documentation of 
the arguments."
                     "" ;; default
                     inherit-input-method)))
               (unless (or (equal result "") selected)
-                (setq selected (split-string result separator 'omit-nulls)
-                      consult--crm-history (cons result hist-val)))))
+                (setq selected (split-string (substring-no-properties result) 
separator 'omit-nulls)
+                      consult--crm-history (append selected hist-val)))))
         (remove-hook 'pre-command-hook hook)))
     (set hist-sym consult--crm-history)
     (when (consp def)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]