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

Append setq-hook! hooks

Browse source 
So that later setq-hook! calls will overwrite earlier ones.
This commit is contained in:
Henrik Lissner 2018-09-20 14:14:11 -04:00
parent c8b07f3caa
commit 3cd0db82b8
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
core/core-lib.el
View file

@ -274,8 +274,8 @@ Body forms can access the hook's arguments through the let-bound variable
fill-column 80)"
(declare (indent 1))
(unless (= 0 (% (length rest) 2))
(signal 'wrong-number-of-arguments (length rest)))
`(add-hook! ,hooks
(signal 'wrong-number-of-arguments (listp #'evenp (length rest))))
`(add-hook! :append ,hooks
,@(let (forms)
(while rest
(let ((var (pop rest))