(defadvice): Add usage pattern.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 788d1e866b363e958a57e413c9727e3ed9b5a39a..c7925e1cd2dac19b15145326269a75d205d4b31b 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-03-13  Richard Stallman  <rms@gnu.org>
+
+       * emacs-lisp/advice.el (defadvice): Add usage pattern.
+
 2008-03-11  Chong Yidong  <cyd@stupidchicken.com>
 
        * simple.el (set-mark-command): Doc fix.

diff --git a/lisp/emacs-lisp/advice.el b/lisp/emacs-lisp/advice.el
index a9e2b58f0dc814ade4dfe69ea27f8dca9e089d36..4babd844cf9e86e56f02da66e6aeb437ec100ca5 100644 (file)
--- a/lisp/emacs-lisp/advice.el
+++ b/lisp/emacs-lisp/advice.el
@@ -3817,7 +3817,10 @@ the advised function.  `freeze' implies `activate' and `preactivate'.  The
 documentation of the advised function can be dumped onto the `DOC' file
 during preloading.
 
-See Info node `(elisp)Advising Functions' for comprehensive documentation."
+See Info node `(elisp)Advising Functions' for comprehensive documentation.
+usage: (defadvice FUNCTION (CLASS NAME [POSITION] [ARGLIST] FLAG...)
+          [DOCSTRING] [INTERACTIVE-FORM]
+          BODY...)"
   (declare (doc-string 3))
   (if (not (ad-name-p function))
       (error "defadvice: Invalid function name: %s" function))