From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 13 Mar 2008 15:28:04 +0000 (+0000)
Subject: (defadvice): Add usage pattern.
X-Git-Tag: emacs-22.2~40
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7aefbb0613d601a127cd7a5f6131ee93fa70db83;p=emacs.git

(defadvice): Add usage pattern.
---

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))