Re: [mituharu@math.s.chiba-u.ac.jp: Cursors in fringe not redrawn by expose events.]

[YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>]

>>>>> On Sat, 28 Apr 2007 00:07:28 -0400, Richard Stallman <rms@gnu.org> said:

> I'd like someone to look at this bug.

I tried it for myself.  Of course, I leave the decision to experts.

				     YAMAMOTO Mitsuharu
				mituharu@math.s.chiba-u.ac.jp

Index: src/xdisp.c
===================================================================
RCS file: /cvsroot/emacs/emacs/src/xdisp.c,v
retrieving revision 1.1149
diff -c -p -r1.1149 xdisp.c
*** src/xdisp.c	24 Apr 2007 01:32:41 -0000	1.1149
--- src/xdisp.c	28 Apr 2007 10:49:57 -0000
*************** phys_cursor_in_rect_p (w, r)
*** 23403,23408 ****
--- 23403,23426 ----
  {
    XRectangle cr, result;
    struct glyph *cursor_glyph;
+   struct glyph_row *row;
+ 
+   if (w->phys_cursor.vpos >= 0
+       && w->phys_cursor.vpos < w->current_matrix->nrows
+       && (row = MATRIX_ROW (w->current_matrix, w->phys_cursor.vpos),
+ 	  row->enabled_p)
+       && row->cursor_in_fringe_p)
+     {
+       /* Cursor is in the fringe.  */
+       cr.x = window_box_right_offset (w,
+ 				      (WINDOW_HAS_FRINGES_OUTSIDE_MARGINS (w)
+ 				       ? RIGHT_MARGIN_AREA
+ 				       : TEXT_AREA));
+       cr.y = row->y;
+       cr.width = WINDOW_RIGHT_FRINGE_WIDTH (w);
+       cr.height = row->height;
+       return x_intersect_rectangles (&cr, r, &result);
+     }
  
    cursor_glyph = get_phys_cursor_glyph (w);
    if (cursor_glyph)