[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/vertico 5219e20 5/5: vertico-map: Use make-composed-key
From: |
Protesilaos Stavrou |
Subject: |
[elpa] externals/vertico 5219e20 5/5: vertico-map: Use make-composed-keymap |
Date: |
Mon, 12 Apr 2021 15:27:25 -0400 (EDT) |
branch: externals/vertico
commit 5219e20e6896752a69a13f7dccc12be937e18080
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
vertico-map: Use make-composed-keymap
---
vertico.el | 5 ++---
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/vertico.el b/vertico.el
index 3409396..55d8742 100644
--- a/vertico.el
+++ b/vertico.el
@@ -88,8 +88,7 @@
"Face used to highlight the currently selected candidate.")
(defvar vertico-map
- (let ((map (make-sparse-keymap)))
- (set-keymap-parent map minibuffer-local-map)
+ (let ((map (make-composed-keymap nil minibuffer-local-map)))
(define-key map [remap beginning-of-buffer] #'vertico-beginning-of-buffer)
(define-key map [remap minibuffer-beginning-of-buffer]
#'vertico-beginning-of-buffer)
(define-key map [remap end-of-buffer] #'vertico-end-of-buffer)
@@ -104,7 +103,7 @@
(define-key map [C-return] #'vertico-exit-input)
(define-key map "\t" #'vertico-insert)
map)
- "Minibuffer keymap.")
+ "Vertico minibuffer keymap derived from `minibuffer-local-map'.")
(defvar-local vertico--highlight #'identity
"Deferred candidate highlighting function.")