From: Richard M. Stallman <rms@gnu.org>
Date: Wed, 22 Jun 1994 15:30:42 +0000 (+0000)
Subject: (backquote-process): Fix criterion for using FIRSTLIST.
X-Git-Tag: emacs-19.34~7846
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=1d08cb509a20afc911cc59aac31238e2cf14ba2d;p=emacs.git

(backquote-process): Fix criterion for using FIRSTLIST.
---

diff --git a/lisp/emacs-lisp/backquote.el b/lisp/emacs-lisp/backquote.el
index 9e1c6c29203..b915e4cbc80 100644
--- a/lisp/emacs-lisp/backquote.el
+++ b/lisp/emacs-lisp/backquote.el
@@ -160,9 +160,12 @@ Vectors work just like lists.  Nested backquotes are permitted."
 	(setq item (backquote-process (car rest)))
 	(cond
 	 ((= (car item) 2)
-	  (if (null firstlist)
+	  ;; Put the nonspliced items before the first spliced item
+	  ;; into FIRSTLIST.
+	  (if (null lists)
 	      (setq firstlist list
 		    list nil))
+	  ;; Otherwise, put any preceding nonspliced items into LISTS.
 	  (if list
 	      (setq lists (cons (backquote-listify list '(0 . nil)) lists)))
 	  (setq lists (cons (cdr item) lists))