diff options
| author | Helmut Eller <eller.helmut@gmail.com> | 2010-06-12 00:06:15 -0700 |
|---|---|---|
| committer | Glenn Morris <rgm@gnu.org> | 2010-06-12 00:06:15 -0700 |
| commit | 37a7e764e86838d21d72dc03d0c42e076cf3e7ea (patch) | |
| tree | 82a87dadce5d452809b71cabbab32b8ab7fa8154 /lisp/emacs-lisp | |
| parent | 103dd3a81a88539029038804d5444f71ed6ab514 (diff) | |
| download | emacs-37a7e764e86838d21d72dc03d0c42e076cf3e7ea.tar.gz emacs-37a7e764e86838d21d72dc03d0c42e076cf3e7ea.tar.bz2 emacs-37a7e764e86838d21d72dc03d0c42e076cf3e7ea.zip | |
Close bug#6408.
* lisp/emacs-lisp/cl-macs.el (destructuring-bind): Bind `bind-enquote',
used by cl-do-arglist.
Diffstat (limited to 'lisp/emacs-lisp')
| -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 8a60ffdf1fe..3e800c53008 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -432,7 +432,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)) |