Simplify doom--resolve-hooks
This commit is contained in:
parent
e77545f1f8
commit
e7720e4aae
1 changed files with 1 additions and 2 deletions
|
@ -52,8 +52,7 @@
|
||||||
(dolist (hook (if (listp hooks) hooks (list hooks)) (nreverse ret-hooks))
|
(dolist (hook (if (listp hooks) hooks (list hooks)) (nreverse ret-hooks))
|
||||||
(push (cond ((eq (car-safe hook) 'quote)
|
(push (cond ((eq (car-safe hook) 'quote)
|
||||||
(cadr hook))
|
(cadr hook))
|
||||||
((string-suffix-p "-hook" (symbol-name hook))
|
(quoted-p hook)
|
||||||
hook)
|
|
||||||
(t
|
(t
|
||||||
(intern (format "%s-hook" (symbol-name hook)))))
|
(intern (format "%s-hook" (symbol-name hook)))))
|
||||||
ret-hooks))))
|
ret-hooks))))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue