]> git.eshelyaron.com Git - emacs.git/commitdiff
(handle_single_display_prop): Use lookup_fringe_bitmap.
authorKim F. Storm <storm@cua.dk>
Wed, 29 Sep 2004 11:58:05 +0000 (11:58 +0000)
committerKim F. Storm <storm@cua.dk>
Wed, 29 Sep 2004 11:58:05 +0000 (11:58 +0000)
src/xdisp.c

index 2577bc46efb2db527852b0aec49b65a64700a80c..ddd247b3430912e83b7eccf2554207519b6ee930 100644 (file)
@@ -307,7 +307,6 @@ extern Lisp_Object Qheight;
 extern Lisp_Object QCwidth, QCheight, QCascent;
 extern Lisp_Object Qscroll_bar;
 extern Lisp_Object Qcursor;
-extern Lisp_Object Qfringe;
 
 /* Non-nil means highlight trailing whitespace.  */
 
@@ -3569,6 +3568,7 @@ handle_single_display_prop (it, prop, object, position,
          && CONSP (XCDR (prop)))
        {
          unsigned face_id = DEFAULT_FACE_ID;
+         int fringe_bitmap;
 
          /* Save current settings of IT so that we can restore them
             when we are finished with the glyph property value.  */
@@ -3580,8 +3580,7 @@ handle_single_display_prop (it, prop, object, position,
 #ifdef HAVE_WINDOW_SYSTEM
          value = XCAR (XCDR (prop));
          if (!SYMBOLP (value)
-             || (value = Fget (value, Qfringe),
-                 !valid_fringe_bitmap_p (value)))
+             || !(fringe_bitmap = lookup_fringe_bitmap (value)))
            return 0;
 
          if (CONSP (XCDR (XCDR (prop))))
@@ -3610,12 +3609,12 @@ handle_single_display_prop (it, prop, object, position,
 
          if (EQ (XCAR (prop), Qleft_fringe))
            {
-             it->left_user_fringe_bitmap = XINT (value);
+             it->left_user_fringe_bitmap = fringe_bitmap;
              it->left_user_fringe_face_id = face_id;
            }
          else
            {
-             it->right_user_fringe_bitmap = XINT (value);
+             it->right_user_fringe_bitmap = fringe_bitmap;
              it->right_user_fringe_face_id = face_id;
            }
 #endif /* HAVE_WINDOW_SYSTEM */