emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Fix #4457: wrong-type-arg keymapp on C-i keybinds

Browse source
This commit is contained in:
Henrik Lissner 2021-01-05 01:50:48 -05:00
parent 6ef517353b
commit da177d58c4
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 5 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

6
core/core-lib.el
View file

@ -99,10 +99,14 @@ at the values with which this function was called."
(if keymap
(lookup-key keymap keys)
(cl-loop for keymap
in (append (mapcar #'cdr (mapcar #'symbol-value emulation-mode-map-alists))
in (append (cl-loop for alist in emulation-mode-map-alists
if (boundp alist)
append (mapcar #'cdr (symbol-value alist)))
(list (current-local-map))
(mapcar #'cdr minor-mode-overriding-map-alist)
(mapcar #'cdr minor-mode-alist)
(list (current-global-map)))
if (keymapp keymap)
if (lookup-key keymap keys)
return it)))