Mercurial > emacs
diff lisp/emacs-lisp/backquote.el @ 340:36bd3a9f20e2
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Fri, 19 Jul 1991 20:39:25 +0000 |
parents | 7e4c7ef44243 |
children | 4cd7543be581 |
line wrap: on
line diff
--- a/lisp/emacs-lisp/backquote.el Fri Jul 19 19:31:48 1991 +0000 +++ b/lisp/emacs-lisp/backquote.el Fri Jul 19 20:39:25 1991 +0000 @@ -151,7 +151,7 @@ (mapcar 'bq-iterative-list-builder (reverse form)) (and state (cond ((eq state 'quote) - (list state tailmaker)) + (list state (if (equal form tailmaker) form tailmaker))) ((= (length tailmaker) 1) (funcall (bq-cadr (assq state bq-singles)) tailmaker)) (t (cons state tailmaker))))))