From: YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
To: rms@gnu.org
Cc: Chong Yidong <cyd@stupidchicken.com>, storm@cua.dk, emacs-devel@gnu.org
Subject: Re: [mituharu@math.s.chiba-u.ac.jp: Cursors in fringe not redrawn by expose events.]
Date: Sat, 28 Apr 2007 20:02:31 +0900 [thread overview]
Message-ID: <wlmz0s92yg.wl%mituharu@math.s.chiba-u.ac.jp> (raw)
In-Reply-To: <E1HheDY-00015D-Ea@fencepost.gnu.org>
>>>>> 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)
next prev parent reply other threads:[~2007-04-28 11:02 UTC|newest]
Thread overview: 6+ messages / expand[flat|nested] mbox.gz Atom feed top
2007-04-26 4:24 [mituharu@math.s.chiba-u.ac.jp: Cursors in fringe not redrawn by expose events.] Richard Stallman
2007-04-26 15:25 ` Kim F. Storm
2007-04-27 19:01 ` Chong Yidong
2007-04-28 4:07 ` Richard Stallman
2007-04-28 11:02 ` YAMAMOTO Mitsuharu [this message]
2007-04-28 6:10 ` Jan Djärv
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=wlmz0s92yg.wl%mituharu@math.s.chiba-u.ac.jp \
--to=mituharu@math.s.chiba-u.ac.jp \
--cc=cyd@stupidchicken.com \
--cc=emacs-devel@gnu.org \
--cc=rms@gnu.org \
--cc=storm@cua.dk \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this external index
https://git.savannah.gnu.org/cgit/emacs.git
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.