Allow map!'s :prefix to accept key vectors
This commit is contained in:
parent
9e54e393ea
commit
11b5a7116f
1 changed files with 7 additions and 1 deletions
|
@ -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)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue