# HG changeset patch
# User Jim Blandy <jimb@redhat.com>
# Date 716388333 0
# Node ID 453c24f2bdaabce008fb930e66c6422a7454a38d
# Parent  55e605674fb189d6bbcba35711a6fdcfb139ca43
	* xdisp.c (display_mode_line): If the only other frames are
	minibuffer frames, don't name the frame after the in the selected
	window.  We can use Fnext_frame to do this test easily.

diff -r 55e605674fb1 -r 453c24f2bdaa src/xdisp.c
--- a/src/xdisp.c	Sun Sep 13 12:38:21 1992 +0000
+++ b/src/xdisp.c	Sun Sep 13 12:45:33 1992 +0000
@@ -1776,14 +1776,21 @@
 
 #ifdef HAVE_X_WINDOWS
   /* I'm trying this out because I saw Unimpress use it, but it's
-     possible that this may mess adversely with some window managers.  jla */
+     possible that this may mess adversely with some window managers.  -jla
 
+     Wouldn't it be nice to use something like mode-line-format to
+     describe frame titles?  -JimB  */
+
+  /* Change the title of the frame to the name of the buffer displayed
+     in the currently selected window.  Don't do this for minibuffer frames,
+     and don't do it when there's only one non-minibuffer frame.  */
   if (FRAME_X_P (f)
       && ! FRAME_MINIBUF_ONLY_P (f)
       && w == XWINDOW (f->selected_window))
-    x_implicitly_set_name (f, ((XINT (Flength (Vframe_list)) > 1)
-			       ? XBUFFER (w->buffer)->name
-			       : Qnil),
+    x_implicitly_set_name (f, (EQ (Fnext_frame (WINDOW_FRAME (w), Qnil),
+				   WINDOW_FRAME (w))
+			       ? Qnil
+			       : XBUFFER (w->buffer)->name),
 			   Qnil);
 #endif
 }