# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1078304570 0
# Node ID 4db32fef93488f805b4cbdfdf041633a25738e5a
# Parent  67285afe56f358269406bca985e3934305776ec0
(display_line): Fix call to get_overlay_arrow_glyph_row.

diff -r 67285afe56f3 -r 4db32fef9348 src/xdisp.c
--- 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];