Remove fmakunbound from add-transient-hook!
unintern is enough.
This commit is contained in:
parent
26f514001e
commit
5ae25318a4
1 changed files with 0 additions and 1 deletions
|
@ -300,7 +300,6 @@ HOOK can be a quoted hook or a sharp-quoted function (which will be advised)."
|
||||||
,@forms
|
,@forms
|
||||||
(cond ((functionp ,hook) (advice-remove ,hook #',fn))
|
(cond ((functionp ,hook) (advice-remove ,hook #',fn))
|
||||||
((symbolp ,hook) (remove-hook ,hook #',fn)))
|
((symbolp ,hook) (remove-hook ,hook #',fn)))
|
||||||
(fmakunbound ',fn)
|
|
||||||
(unintern ',fn nil)))
|
(unintern ',fn nil)))
|
||||||
(cond ((functionp ,hook)
|
(cond ((functionp ,hook)
|
||||||
(advice-add ,hook ,(if append :after :before) #',fn))
|
(advice-add ,hook ,(if append :after :before) #',fn))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue