(defadvice): Add usage pattern.

2 files changed, 8 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 788d1e866b3..c7925e1cd2d 100644
--- 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 a9e2b58f0dc..4babd844cf9 100644
--- 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))