[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/consult 9fb5111066 5/5: Keep separate history for consu
|
From: |
ELPA Syncer |
|
Subject: |
[elpa] externals/consult 9fb5111066 5/5: Keep separate history for consult-line-multi |
|
Date: |
Mon, 27 Nov 2023 18:57:33 -0500 (EST) |
branch: externals/consult
commit 9fb51110661965bd58183eeb9884aebf354a51a5
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Keep separate history for consult-line-multi
---
CHANGELOG.org | 3 +--
consult.el | 3 ++-
2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/CHANGELOG.org b/CHANGELOG.org
index 10fa1a35be..80368ff161 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -20,8 +20,7 @@
- Save input history even when using =embark-export= or when aborting from a
command via C-g. This change affects commands like =consult-line= and
=consult-grep=.
-- Unify history of =consult-line=, =consult-line-multi=, =consult-keep-lines=
and
- =consult-focus-lines=.
+- Unify history of =consult-line=, =consult-keep-lines= and
=consult-focus-lines=.
* Version 0.35 (2023-07-02)
diff --git a/consult.el b/consult.el
index 69cdb59147..9aff744516 100644
--- a/consult.el
+++ b/consult.el
@@ -483,6 +483,7 @@ Used by `consult-completion-in-region', `consult-yank' and
`consult-history'.")
(defvar consult--find-history nil)
(defvar consult--man-history nil)
(defvar consult--line-history nil)
+(defvar consult--line-multi-history nil)
(defvar consult--theme-history nil)
(defvar consult--minor-mode-menu-history nil)
(defvar consult--buffer-history nil)
@@ -3425,7 +3426,7 @@ to `consult--buffer-query'."
:add-history (mapcar #'consult--async-split-initial
(delq nil (list (thing-at-point 'symbol)
isearch-string)))
- :history '(:input consult--line-history)
+ :history '(:input consult--line-multi-history)
:lookup #'consult--line-multi-match
;; Add `isearch-string' as initial input if starting from Isearch
:initial (consult--async-split-initial