summaryrefslogtreecommitdiff
path: root/lisp/keymap.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/keymap.el')
-rw-r--r--lisp/keymap.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/keymap.el b/lisp/keymap.el
index 48f087c5287..fd91689f887 100644
--- a/lisp/keymap.el
+++ b/lisp/keymap.el
@@ -411,9 +411,10 @@ specified buffer position instead of point are used."
(error "Can't pass in both keymap and position"))
(if keymap
(let ((value (lookup-key keymap (key-parse key) accept-default)))
- (when (and (not no-remap)
+ (if (and (not no-remap)
(symbolp value))
- (or (command-remapping value) value)))
+ (or (command-remapping value) value)
+ value))
(key-binding (kbd key) accept-default no-remap position)))
(defun keymap-local-lookup (keys &optional accept-default)