changeset 57257:0869d141e93c

(handle_single_display_prop): Fringe bitmaps are now symbols with a fringe property.
author Kim F. Storm <storm@cua.dk>
date Tue, 28 Sep 2004 23:02:41 +0000
parents 14ec244a588e
children 36eef73e00fa
files src/xdisp.c
diffstat 1 files changed, 4 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- 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))))