Mercurial > emacs
changeset 54250:4db32fef9348
(display_line): Fix call to get_overlay_arrow_glyph_row.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Wed, 03 Mar 2004 09:02:50 +0000 |
| parents | 67285afe56f3 |
| children | 1cf83db1ed7f |
| files | src/xdisp.c |
| diffstat | 1 files changed, 5 insertions(+), 5 deletions(-) [+] |
line wrap: on
line diff
--- a/src/xdisp.c Wed Mar 03 09:02:24 2004 +0000 +++ b/src/xdisp.c Wed Mar 03 09:02:50 2004 +0000 @@ -9420,15 +9420,15 @@ 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 @@ 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];