changeset 8007:5b6bbe9478b5

(backquote-process): Fix criterion for using FIRSTLIST.
author Richard M. Stallman <rms@gnu.org>
date Wed, 22 Jun 1994 15:30:42 +0000
parents 6e58b282df42
children 049bc48732d6
files lisp/emacs-lisp/backquote.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/backquote.el	Wed Jun 22 05:16:22 1994 +0000
+++ b/lisp/emacs-lisp/backquote.el	Wed Jun 22 15:30:42 1994 +0000
@@ -160,9 +160,12 @@
 	(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))