# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1096412561 0
# Node ID 0869d141e93c545a393c35c34344804753b89c5b
# Parent  14ec244a588eca1ac494e6a4b5aead4e2d1644ad
(handle_single_display_prop): Fringe bitmaps are now
symbols with a fringe property.

diff -r 14ec244a588e -r 0869d141e93c src/xdisp.c
--- a/src/xdisp.c	Tue Sep 28 22:24:47 2004 +0000
+++ b/src/xdisp.c	Tue Sep 28 23:02:41 2004 +0000
@@ -307,6 +307,7 @@
 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.  */
 
@@ -3578,8 +3579,9 @@
 
 #ifdef HAVE_WINDOW_SYSTEM
 	  value = XCAR (XCDR (prop));
-	  if (!NUMBERP (value)
-	      || !valid_fringe_bitmap_id_p (XINT (value)))
+	  if (!SYMBOLP (value)
+	      || (value = Fget (value, Qfringe),
+		  !valid_fringe_bitmap_p (value)))
 	    return 0;
 
 	  if (CONSP (XCDR (XCDR (prop))))