diff options
author | Kim F. Storm <[email protected]> | 2004-03-03 09:02:50 +0000 |
---|---|---|
committer | Kim F. Storm <[email protected]> | 2004-03-03 09:02:50 +0000 |
commit | 7d90b5870ba07a5df6043f660e753484722bb0d0 (patch) | |
tree | 80f5d4ad57fa66383dc0e6663d2145d5c1a00c75 /src/xdisp.c | |
parent | 6c2488df0c41c84df0389e65d2481d3d08eec796 (diff) |
(display_line): Fix call to get_overlay_arrow_glyph_row.
Diffstat (limited to 'src/xdisp.c')
-rw-r--r-- | src/xdisp.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/xdisp.c b/src/xdisp.c index 7fbe6c1b93..fb66bf0beb 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -9420,15 +9420,15 @@ update_overlay_arrows (up_to_date) vlist = XCDR (vlist)) { Lisp_Object var = XCAR (vlist); - Lisp_Object val; if (!SYMBOLP (var)) continue; if (up_to_date) { + Lisp_Object val = find_symbol_value (var); Fput (var, Qlast_arrow_position, - COERCE_MARKER (find_symbol_value (var))); + COERCE_MARKER (val)); Fput (var, Qlast_arrow_string, overlay_arrow_string_or_property (var, 0)); } @@ -14749,15 +14749,15 @@ display_line (it) This is clearly a mess with variable size fonts. It would be better to let it be displayed like cursors under X. */ if (! overlay_arrow_seen - && (overlay_arrow_string = overlay_arrow_at_row (it->f, row, - &overlay_arrow_bitmap), + && (overlay_arrow_string + = overlay_arrow_at_row (it->f, row, &overlay_arrow_bitmap), !NILP (overlay_arrow_string))) { /* Overlay arrow in window redisplay is a fringe bitmap. */ if (!FRAME_WINDOW_P (it->f)) { struct glyph_row *arrow_row - = get_overlay_arrow_glyph_row (it->w, overlay_arrow_bitmap); + = get_overlay_arrow_glyph_row (it->w, overlay_arrow_string); struct glyph *glyph = arrow_row->glyphs[TEXT_AREA]; struct glyph *arrow_end = glyph + arrow_row->used[TEXT_AREA]; struct glyph *p = row->glyphs[TEXT_AREA]; |