awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Allow map!'s :prefix to accept key vectors

Browse Source
This commit is contained in:
Henrik Lissner
2018-06-15 16:15:24 +02:00
parent 9e54e393ea
commit 11b5a7116f
1 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
core/core-keybinds.el
View File

@ -249,7 +249,13 @@ Example
forms))) forms)))
(:prefix (:prefix
(let ((def (pop rest))) (let ((def (pop rest)))
(setq doom--prefix `(vconcat ,doom--prefix (kbd ,def))) (setq doom--prefix
`(vconcat ,doom--prefix
,(if (or (stringp def)
(and (symbolp def)
(stringp (symbol-value def))))
`(kbd ,def)
def)))
(when desc (when desc
(push `(doom--keybind-register ,(key-description (eval doom--prefix)) (push `(doom--keybind-register ,(key-description (eval doom--prefix))
,desc ',modes) ,desc ',modes)