# HG changeset patch
# User YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
# Date 1198465275 0
# Node ID f92febffffddb430327d0fc0dfd5ca7795e524a6
# Parent  589a315970860af64c582dd1572aee12e3aec81e
(phys_cursor_in_rect_p): Check if cursor is in fringe area.

diff -r 589a31597086 -r f92febffffdd src/xdisp.c
--- a/src/xdisp.c	Sun Dec 23 19:13:48 2007 +0000
+++ b/src/xdisp.c	Mon Dec 24 03:01:15 2007 +0000
@@ -23481,6 +23481,24 @@
 {
   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)