Function: hypb:advised-p

hypb:advised-p is an autoloaded and byte-compiled function defined in hypb.el.

Signature

(hypb:advised-p ADVISED-FUNCTION ADVICE-FUNCTION)

Documentation

Return t if ADVISED-FUNCTION is advised with ADVICE-FUNCTION.

Uses the newer "nadvice" elisp library, not "advice".

Source Code

;; Defined in ~/.emacs.d/elpa/hyperbole-20260414.325/hypb.el
;;;###autoload
(defun hypb:advised-p (advised-function advice-function)
  "Return t if ADVISED-FUNCTION is advised with ADVICE-FUNCTION.
Uses the newer \"nadvice\" elisp library, not \"advice\"."
  (let (found)
    (when (advice--p (symbol-function advised-function))
      (advice-mapc (lambda (advs _props)
                     (when (eq advs advice-function)
                       (setq found t)))
                   advised-function))
    found))