summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp/backquote.el
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>2001-06-13 15:30:35 +0000
committerRichard M. Stallman <rms@gnu.org>2001-06-13 15:30:35 +0000
commitea4a56de11657fd72e16dc27cf50c557c0715bc9 (patch)
treef53f4f5518844125a7d163aaba08e008dbe05c5e /lisp/emacs-lisp/backquote.el
parentfd344fb75f1e0bca5b208d01b9a04c2ba0ad09b8 (diff)
downloademacs-ea4a56de11657fd72e16dc27cf50c557c0715bc9.tar.gz
(backquote-process): Handle `[,@SYMBOL].
Diffstat (limited to 'lisp/emacs-lisp/backquote.el')
-rw-r--r--lisp/emacs-lisp/backquote.el2
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index 9b7e7a95fb3..ea5fd54094c 100644
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -114,6 +114,8 @@ Vectors work just like lists. Nested backquotes are permitted."
(if (= (car n) 0)
(cons 0 s)
(cons 1 (cond
+ ((not (listp (cdr n)))
+ (list 'vconcat (cdr n)))
((eq (nth 1 n) 'list)
(cons 'vector (nthcdr 2 n)))
((eq (nth 1 n) 'append)