diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-08-03 13:47:40 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-08-03 13:48:31 +0200 |
commit | 8edd4bc22af5a255dc4941469cd30a835dcd1234 (patch) | |
tree | acd2b4b90c48a988e440dfca573b6bef79d92ec8 /lisp/emacs-lisp | |
parent | 3bff466aa687464f32d378aed01af41f45bbb239 (diff) | |
download | emacs-8edd4bc22af5a255dc4941469cd30a835dcd1234.tar.gz emacs-8edd4bc22af5a255dc4941469cd30a835dcd1234.tar.bz2 emacs-8edd4bc22af5a255dc4941469cd30a835dcd1234.zip |
Fix previous macroexp-progn doc string fix
* lisp/emacs-lisp/macroexp.el (macroexp-progn): Fix previous doc
string clarification.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r-- | lisp/emacs-lisp/macroexp.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/macroexp.el b/lisp/emacs-lisp/macroexp.el index 9b29d0058c0..d27cc0a63c5 100644 --- a/lisp/emacs-lisp/macroexp.el +++ b/lisp/emacs-lisp/macroexp.el @@ -319,8 +319,9 @@ definitions to shadow the loaded ones for use in file byte-compilation." (cons (nreverse decls) body))) (defun macroexp-progn (exps) - "Return EXPS with `progn' prepended. -If EXPS is a single expression, `progn' is not prepended." + "Return EXPS (a list of expressions) with `progn' prepended. +If EXPS is a list with a single expression, `progn' is not +prepended, but that expression is returned instead." (if (cdr exps) `(progn ,@exps) (car exps))) (defun macroexp-unprogn (exp) |