diff options
Diffstat (limited to 'lisp/emacs-lisp/macroexp.el')
| -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) |