fix: wrong-type-arg error on startup

Regression caused by change to doom-enlist in b35b32273.

Amend: b35b32273a
This commit is contained in:
Henrik Lissner 2021-10-20 22:06:25 +02:00
parent db9106f92c
commit b0438f1589

View file

@ -301,7 +301,8 @@ For example, :nvi will map to (list 'normal 'visual 'insert). See
(setq rest nil)) (setq rest nil))
(:prefix-map (:prefix-map
(cl-destructuring-bind (prefix . desc) (cl-destructuring-bind (prefix . desc)
(doom-enlist (pop rest)) (let ((arg (pop rest)))
(if (consp arg) arg (list arg)))
(let ((keymap (intern (format "doom-leader-%s-map" desc)))) (let ((keymap (intern (format "doom-leader-%s-map" desc))))
(setq rest (setq rest
(append (list :desc desc prefix keymap (append (list :desc desc prefix keymap
@ -311,7 +312,8 @@ For example, :nvi will map to (list 'normal 'visual 'insert). See
doom--map-forms)))) doom--map-forms))))
(:prefix (:prefix
(cl-destructuring-bind (prefix . desc) (cl-destructuring-bind (prefix . desc)
(doom-enlist (pop rest)) (let ((arg (pop rest)))
(if (consp arg) arg (list arg)))
(doom--map-set (if doom--map-fn :infix :prefix) (doom--map-set (if doom--map-fn :infix :prefix)
prefix) prefix)
(when (stringp desc) (when (stringp desc)