From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 8 Apr 1995 00:19:28 +0000 (+0000)
Subject: (prepare_menu_bars): Do the frame titles last.
X-Git-Tag: emacs-19.34~4574
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ab2f96f8227a27f923b252a566b3f3d6200e8365;p=emacs.git

(prepare_menu_bars): Do the frame titles last.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index 02c71203b1d..833f9083511 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -680,18 +680,6 @@ prepare_menu_bars ()
   all_windows = (update_mode_lines || buffer_shared > 1
 		 || clip_changed || windows_or_buffers_changed);
 
-#ifdef HAVE_X_WINDOWS
-  if (windows_or_buffers_changed)
-    {
-      Lisp_Object tail, frame;
-
-      FOR_EACH_FRAME (tail, frame)
-	if (FRAME_VISIBLE_P (XFRAME (frame))
-	    || FRAME_ICONIFIED_P (XFRAME (frame)))
-	  x_consider_frame_title (frame);
-    }
-#endif
-
   /* Update the menu bar item lists, if appropriate.
      This has to be done before any actual redisplay
      or generation of display lines.  */
@@ -723,6 +711,22 @@ prepare_menu_bars ()
     }
   else
     update_menu_bar (selected_frame);
+
+  /* Update all frame titles based on their buffer names, etc.
+     We do this after the menu bars so that the frame will first
+     create its menu bar using the name `emacs' if no other name
+     has yet been specified.  */
+#ifdef HAVE_X_WINDOWS
+  if (windows_or_buffers_changed)
+    {
+      Lisp_Object tail, frame;
+
+      FOR_EACH_FRAME (tail, frame)
+	if (FRAME_VISIBLE_P (XFRAME (frame))
+	    || FRAME_ICONIFIED_P (XFRAME (frame)))
+	  x_consider_frame_title (frame);
+    }
+#endif
 }
 
 /* Do a frame update, taking possible shortcuts into account.