[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)