X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fframe-tty.c;h=a079f8a0c3f56f53ab5ffa5b4697d1380679402b;hb=6b3f40dfa3d8f18a2fcc6932be7f82acd94261c2;hp=24438e789716694d89f53c7db9069d45211d778e;hpb=6883ee56ec887c2c48abe5b06b5e66aa74031910;p=chise%2Fxemacs-chise.git-

diff --git a/src/frame-tty.c b/src/frame-tty.c
index 24438e7..a079f8a 100644
--- a/src/frame-tty.c
+++ b/src/frame-tty.c
@@ -155,13 +155,11 @@ tty_frame_visible_p (struct frame *f)
 static void
 tty_raise_frame_no_select (struct frame *f)
 {
-  struct frame *o;
-  Lisp_Object tail;
-
-  LIST_LOOP (tail, DEVICE_FRAME_LIST (XDEVICE (FRAME_DEVICE (f))))
+  Lisp_Object frame;
+  LIST_LOOP_2 (frame, DEVICE_FRAME_LIST (XDEVICE (FRAME_DEVICE (f))))
     {
-      o = XFRAME (XCAR (tail));
-      if (o != f && FRAME_REPAINT_P(o))
+      struct frame *o = XFRAME (frame);
+      if (o != f && FRAME_REPAINT_P (o))
 	{
 	   tty_make_frame_hidden (o);
 	   break;
@@ -216,7 +214,7 @@ tty_delete_frame (struct frame *f)
 }
 
 /************************************************************************/
-/*                            initialization                            */
+/*			      initialization				*/
 /************************************************************************/
 
 void