From: Karl Heuer <kwzh@gnu.org>
Date: Fri, 25 Mar 1994 00:41:05 +0000 (+0000)
Subject: (unshow_buffer, window_loop, Fdisplay_buffer): Use assignment, not
X-Git-Tag: emacs-19.34~9335
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=12cae7c04d60bd4eaa0d65afd1271ab4f1f93c4d;p=emacs.git

(unshow_buffer, window_loop, Fdisplay_buffer): Use assignment, not
initialization.
---

diff --git a/src/window.c b/src/window.c
index 98a5cbfc0b4..12cdca006cd 100644
--- a/src/window.c
+++ b/src/window.c
@@ -615,8 +615,9 @@ static
 unshow_buffer (w)
      register struct window *w;
 {
-  Lisp_Object buf = w->buffer;
+  Lisp_Object buf;
 
+  buf = w->buffer;
   if (XBUFFER (buf) != XMARKER (w->pointm)->buffer)
     abort ();
 
@@ -1219,7 +1220,8 @@ window_loop (type, obj, mini, frames)
 		   on the frame, find a new buffer to display there.  */
 		if (NILP (XWINDOW (w)->parent))
 		  {
-		    Lisp_Object new_buffer = Fother_buffer (obj, Qnil);
+		    Lisp_Object new_buffer;
+		    new_buffer = Fother_buffer (obj, Qnil);
 		    if (NILP (new_buffer))
 		      new_buffer
 			= Fget_buffer_create (build_string ("*scratch*"));
@@ -1252,7 +1254,8 @@ window_loop (type, obj, mini, frames)
 	    if (EQ (XWINDOW (w)->buffer, obj))
 	      {
 		/* Find another buffer to show in this window.  */
-		Lisp_Object another_buffer = Fother_buffer (obj, Qnil);
+		Lisp_Object another_buffer;
+		another_buffer = Fother_buffer (obj, Qnil);
 		if (NILP (another_buffer))
 		  another_buffer
 		    = Fget_buffer_create (build_string ("*scratch*"));
@@ -1735,8 +1738,9 @@ Returns the window displaying BUFFER.")
 #endif
       )
     {
-      Lisp_Object frames = Qnil;
-      
+      Lisp_Object frames;
+
+      frames = Qnil;      
 #ifdef MULTI_FRAME
       if (FRAME_MINIBUF_ONLY_P (selected_frame))
 	XSET (frames, Lisp_Frame, last_nonminibuf_frame);