Mercurial > emacs

changeset 1124:453c24f2bdaa

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* 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.
author Jim Blandy <jimb@redhat.com>
date Sun, 13 Sep 1992 12:45:33 +0000
parents 55e605674fb1
children 059624bf9bf0
files src/xdisp.c
diffstat 1 files changed, 11 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- 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
 }