Function: advice--buffer-local

advice--buffer-local is a byte-compiled function defined in nadvice.el.gz.

Signature

(advice--buffer-local VAR)

Documentation

Buffer-local value of VAR, presumed to contain a function.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/nadvice.el.gz
;;;###autoload
(defun advice--buffer-local (var)
  "Buffer-local value of VAR, presumed to contain a function."
  (declare (gv-setter advice--set-buffer-local))
  (if (local-variable-p var) (symbol-value var)
    (setq advice--buffer-local-function-sample
          ;; This function acts like the t special value in buffer-local hooks.
          ;; FIXME: Provide an `advice-bottom' function that's like
          ;; `advice-cd*r' but also follows through this proxy.
          (lambda (&rest args) (apply (default-value var) args)))))