* lisp/gnus/nnoo.el (defvoo, deffoo): Add `doc-string` property

diff --git a/lisp/gnus/nnoo.el b/lisp/gnus/nnoo.el
index 7759951662aa61ac758ea94da304e116f3411f5a..4e8490125f116336b1df181261a66e9031c346b1 100644 (file)
--- a/lisp/gnus/nnoo.el
+++ b/lisp/gnus/nnoo.el
@@ -34,6 +34,7 @@
 (defmacro defvoo (var init &optional doc &rest map)
   "The same as `defvar', only takes list of variables to MAP to."
   (declare (indent 2)
+           (doc-string 3)
            (debug (var init &optional doc &rest map)))
   `(prog1
        ,(if doc
@@ -44,6 +45,7 @@
 (defmacro deffoo (func args &rest forms)
   "The same as `defun', only register FUNC."
   (declare (indent 2)
+           (doc-string 3)
            (debug (&define name lambda-list def-body)))
   `(prog1
        (defun ,func ,args ,@forms)