From db25ed416c7944021e8afc66f38de8131a1d9a7c Mon Sep 17 00:00:00 2001 From: "Kim F. Storm" Date: Tue, 28 Sep 2004 23:02:41 +0000 Subject: [PATCH] (handle_single_display_prop): Fringe bitmaps are now symbols with a fringe property. --- src/xdisp.c | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/src/xdisp.c b/src/xdisp.c index 874f1951256..2577bc46efb 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -307,6 +307,7 @@ 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. */ @@ -3578,8 +3579,9 @@ handle_single_display_prop (it, prop, object, position, #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)))) -- 2.39.2