Fix #4548: global TAB overwritten by evil keybind

This commit is contained in:
Henrik Lissner 2021-02-06 06:54:18 -05:00
parent 45b68e46ee
commit 16a495c97d
3 changed files with 19 additions and 9 deletions

View file

@ -94,10 +94,10 @@ at the values with which this function was called."
(lambda (&rest pre-args)
(apply fn (append pre-args args))))
(defun doom-lookup-key (keys &optional keymap)
(defun doom-lookup-key (keys &rest keymaps)
"Like `lookup-key', but search active keymaps if KEYMAP is omitted."
(if keymap
(lookup-key keymap keys)
(if keymaps
(cl-some (doom-rpartial #'lookup-key keys) keymaps)
(cl-loop for keymap
in (append (cl-loop for alist in emulation-mode-map-alists
append (mapcar #'cdr