diff options
author | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-06-18 10:13:59 -0400 |
---|---|---|
committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-06-18 10:13:59 -0400 |
commit | 894e369ddf48e191638b8e66ce732f24ff9abe2a (patch) | |
tree | 0d14b38c2946f0067c856911bf4949b7e8091a88 /lisp/emacs-lisp/cl-macs.el | |
parent | 4a330052b4815cf833071aae5cb312f6f0f63613 (diff) | |
parent | b1a03ef6bfba4296dddc3df1e8f9d54aba3e45e3 (diff) | |
download | emacs-894e369ddf48e191638b8e66ce732f24ff9abe2a.tar.gz emacs-894e369ddf48e191638b8e66ce732f24ff9abe2a.tar.bz2 emacs-894e369ddf48e191638b8e66ce732f24ff9abe2a.zip |
Merge from trunk
Diffstat (limited to 'lisp/emacs-lisp/cl-macs.el')
-rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 444178edb0c..694a06f8338 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -438,7 +438,7 @@ It is a list of elements of the form either: ;;;###autoload (defmacro destructuring-bind (args expr &rest body) (let* ((bind-lets nil) (bind-forms nil) (bind-inits nil) - (bind-defs nil) (bind-block 'cl-none)) + (bind-defs nil) (bind-block 'cl-none) (bind-enquote nil)) (cl-do-arglist (or args '(&aux)) expr) (append '(progn) bind-inits (list (nconc (list 'let* (nreverse bind-lets)) |