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

core-lib (add-transient-hook!): set permanent-local-hook on hook fn

Browse source
This commit is contained in:
Henrik Lissner 2018-05-24 22:35:45 +02:00
parent e8653d0628
commit 9e7703db2a
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
1 changed files with 1 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

1
core/core-lib.el
View file

@ -249,6 +249,7 @@ HOOK can be a quoted hook or a sharp-quoted function (which will be advised)."
(cond ((functionp ,hook) (cond ((functionp ,hook)
(advice-add ,hook ,(if append :after :before) #',fn)) (advice-add ,hook ,(if append :after :before) #',fn))
((symbolp ,hook) ((symbolp ,hook)
(put ',fn 'permanent-local-hook t)
(add-hook ,hook #',fn ,append)))))) (add-hook ,hook #',fn ,append))))))
(defmacro add-hook! (&rest args) (defmacro add-hook! (&rest args)