From: Kim F. Storm <storm@cua.dk>
Date: Sun, 21 Nov 2004 15:47:55 +0000 (+0000)
Subject: (erase_phys_cursor): Clear hollow cursor inside TEXT_AREA.
X-Git-Tag: ttn-vms-21-2-B4~3774
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e1dca3678d5b062a59e923af0b1e9cf56ffa22a5;p=emacs.git

(erase_phys_cursor): Clear hollow cursor inside TEXT_AREA.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index fabc1e108a5..3b7b9d39f81 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -20120,6 +20120,7 @@ erase_phys_cursor (w)
     {
       int x, y;
       int header_line_height = WINDOW_HEADER_LINE_HEIGHT (w);
+      int width;
 
       cursor_glyph = get_phys_cursor_glyph (w);
       if (cursor_glyph == NULL)
@@ -20127,9 +20128,10 @@ erase_phys_cursor (w)
 
       x = WINDOW_TEXT_TO_FRAME_PIXEL_X (w, w->phys_cursor.x);
       y = WINDOW_TO_FRAME_PIXEL_Y (w, max (header_line_height, cursor_row->y));
+      width = min (cursor_glyph->pixel_width,
+		   window_box_width (w, TEXT_AREA) - w->phys_cursor.x);
 
-      rif->clear_frame_area (f, x, y,
-			     cursor_glyph->pixel_width, cursor_row->visible_height);
+      rif->clear_frame_area (f, x, y, width, cursor_row->visible_height);
     }
 
   /* Erase the cursor by redrawing the character underneath it.  */