summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2006-05-25 00:00:50 +0000
committerRichard M. Stallman <rms@gnu.org>2006-05-25 00:00:50 +0000
commit379ba58e7676783024bfd1cba67e0c9996ae250a (patch)
treee17d4cdf0717f9343c653f7df400962050f092b0 /lisp/emacs-lisp
parent870560eb10c04f48f7b657664c45894a4820f874 (diff)
downloademacs-379ba58e7676783024bfd1cba67e0c9996ae250a.tar.gz
emacs-379ba58e7676783024bfd1cba67e0c9996ae250a.tar.bz2
emacs-379ba58e7676783024bfd1cba67e0c9996ae250a.zip
(ad-enable-advice, ad-activate, ad-disable-advice): Add autoloads.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/advice.el3
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el
index 486a3b049ae..d03245bf452 100644
--- a/lisp/emacs-lisp/advice.el
+++ b/lisp/emacs-lisp/advice.el
@@ -2350,6 +2350,7 @@ FUNCTION was not advised)."
(ad-advice-set-enabled advice flag))))))
matched-advices)))
+;;;###autoload
(defun ad-enable-advice (function class name)
"Enables the advice of FUNCTION with CLASS and NAME."
(interactive (ad-read-advice-specification "Enable advice of"))
@@ -2359,6 +2360,7 @@ FUNCTION was not advised)."
function class name))
(error "ad-enable-advice: `%s' is not advised" function)))
+;;;###autoload
(defun ad-disable-advice (function class name)
"Disable the advice of FUNCTION with CLASS and NAME."
(interactive (ad-read-advice-specification "Disable advice of"))
@@ -3585,6 +3587,7 @@ the value of `ad-redefinition-action' and de/activate again."
;; @@ The top-level advice interface:
;; ==================================
+;;;###autoload
(defun ad-activate (function &optional compile)
"Activate all the advice information of an advised FUNCTION.
If FUNCTION has a proper original definition then an advised