[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master e4e8a1e: * lisp/gnus/nnoo.el (defvoo, deffoo): Add `doc-string` p
From: |
Stefan Monnier |
Subject: |
master e4e8a1e: * lisp/gnus/nnoo.el (defvoo, deffoo): Add `doc-string` property |
Date: |
Fri, 7 May 2021 22:41:50 -0400 (EDT) |
branch: master
commit e4e8a1e834d7c83341450b65d06e088c92f4316e
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>
* lisp/gnus/nnoo.el (defvoo, deffoo): Add `doc-string` property
---
lisp/gnus/nnoo.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/lisp/gnus/nnoo.el b/lisp/gnus/nnoo.el
index 7759951..4e84901 100644
--- 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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master e4e8a1e: * lisp/gnus/nnoo.el (defvoo, deffoo): Add `doc-string` property,
Stefan Monnier <=