changeset 97363:e4c43328a99d

(defun-cvs-mode): Add `doc-string' decl.
author John Paul Wallington <jpw@pobox.com>
date Sat, 09 Aug 2008 15:52:51 +0000
parents a7ddf766669d
children dfa1221f7a48
files lisp/pcvs.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/pcvs.el	Fri Aug 08 17:46:49 2008 +0000
+++ b/lisp/pcvs.el	Sat Aug 09 15:52:51 2008 +0000
@@ -757,7 +757,8 @@
 - NOARGS will get all the arguments from the *cvs* buffer and will
   always behave as if called interactively.
 - DOUBLE is the generic case."
-  (declare (debug (&define sexp lambda-list stringp ("interactive" interactive) def-body)))
+  (declare (debug (&define sexp lambda-list stringp ("interactive" interactive) def-body))
+	   (doc-string 3))
   (let ((style (cvs-cdr fun))
 	(fun (cvs-car fun)))
     (cond