请问advice-add添加的advice怎么临时禁用

Emacs-general
1

如题。advice.el中有ad-deactivate，ad-disable-advice等，但nadvice.el就没有相似函数，试了ad-deactivate不能临时禁用。

1 个赞
2

方法一：

(unwind-protect
    (progn
      (advice-remove 'foo #'foo-advice)
      (foo ...))
  (advice-add 'foo :<WHERE> #'foo-advice))

方法二：

(if-let ((orig-fn
          (and (advice--p (symbol-function 'foo))
               (advice--cdr (symbol-function 'foo)))))
    (funcall orig-fn ...))

相关主题：https://emacs-china.org/t/elisp-advice/

2 个赞
3

多谢，不知方法一开销怎么样？似乎方法二好