Mercurial > emacs

changeset 6517:8f5f79c3091a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(unshow_buffer, window_loop, Fdisplay_buffer): Use assignment, not initialization.
author Karl Heuer <kwzh@gnu.org>
date Fri, 25 Mar 1994 00:41:05 +0000
parents 8278049ee7a7
children 07ecb7a5c916
files src/window.c
diffstat 1 files changed, 10 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/src/window.c	Fri Mar 25 00:40:44 1994 +0000
+++ b/src/window.c	Fri Mar 25 00:41:05 1994 +0000
@@ -615,8 +615,9 @@
 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 @@
 		   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 @@
 	    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 @@
 #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);