From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 10 Mar 1994 00:23:35 +0000 (+0000)
Subject: (display_mode_line): Highlight partial-width mode lines
X-Git-Tag: emacs-19.34~9574
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d7eb09a0cd3b5579ad67e24f52ad50881d9961e7;p=emacs.git

(display_mode_line): Highlight partial-width mode lines
for a non-termcal frame.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index 7a3a84e221e..d2e5966049a 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -2461,6 +2461,14 @@ display_mode_line (w)
   if (XFASTINT (w->width) == FRAME_WIDTH (f)
       || XFASTINT (XWINDOW (w->parent)->width) == FRAME_WIDTH (f))
     FRAME_DESIRED_GLYPHS (f)->highlight[vpos] = mode_line_inverse_video;
+  else if (! FRAME_TERMCAP_P (f))
+    {
+      /* For a partial width window, explicitly set face of each glyph. */
+      int i;
+      GLYPH *ptr = FRAME_DESIRED_GLYPHS (f)->glyphs[vpos];
+      for (i = left; i < right; ++i)
+	ptr[i] = MAKE_GLYPH (GLYPH_CHAR (ptr[i]), 1);
+    }
 
 #ifdef HAVE_X_WINDOWS
   /* I'm trying this out because I saw Unimpress use it, but it's