# HG changeset patch
# User Boris Goldowsky <boris@gnu.org>
# Date 854740434 0
# Node ID 380e33f3a5c63b08d4f5bba154d0b1dd83fba3bb
# Parent  46b39d9f3ad0eefafe80b9f39be39901a02a8b75
Fix bug that caused crash on certain tags with parameters

diff -r 46b39d9f3ad0 -r 380e33f3a5c6 lisp/format.el
--- a/lisp/format.el	Fri Jan 31 09:35:39 1997 +0000
+++ b/lisp/format.el	Fri Jan 31 19:53:54 1997 +0000
@@ -518,7 +518,7 @@
 					    (assoc (car to-reset) 
 						   (cdr open-ans)))
 				      (if this-one
-					  (setcdr this-one (list loc)))
+					  (setcar (cdr this-one) loc))
 				      (setq to-reset (cdr to-reset))))
 				  ;; Set loop variables to nil so loop
 				  ;; will exit.