procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source
This commit is contained in:
Stefan Monnier 2021-05-07 22:41:44 -04:00
parent 048cc03290
commit e4e8a1e834
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/gnus/nnoo.el
View file

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