summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/backquote.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index 3b9a071d378..82cd99a114a 100644
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -151,7 +151,7 @@ See backquote.el for details"
(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))))))