From 55ff91e822b3ffaf43ef2330aba33f2ba85ea12a Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 4 Dec 2021 05:24:54 +0100 Subject: [PATCH] Fix keymap-lookup implementation * lisp/keymap.el (keymap-lookup): Make this actually work for looking up keys. --- lisp/keymap.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/keymap.el b/lisp/keymap.el index 07e43c37b36..48f087c5287 100644 --- a/lisp/keymap.el +++ b/lisp/keymap.el @@ -407,10 +407,10 @@ be a number or marker, in which case the keymap properties at the specified buffer position instead of point are used." (declare (compiler-macro (lambda (form) (keymap--compile-check key) form))) (keymap--check key) - (when (and keymap (not position)) + (when (and keymap position) (error "Can't pass in both keymap and position")) (if keymap - (let ((value (lookup-key (key-parse key) keymap accept-default))) + (let ((value (lookup-key keymap (key-parse key) accept-default))) (when (and (not no-remap) (symbolp value)) (or (command-remapping value) value))) -- 2.39.2