From 31ac723b3940257494af1eca3afd2feaac5534e1 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Tue, 4 Sep 2001 01:02:16 +0000 Subject: [PATCH] (handle_single_display_prop): Fix for int/Lisp_Object mixup. --- src/xdisp.c | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/xdisp.c b/src/xdisp.c index 8b3fc8ea654..4e4f54f1d3d 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -2824,10 +2824,10 @@ handle_single_display_prop (it, prop, object, position, object where the property was found, and `buffer-position' to the current position in the buffer. */ specbind (Qobject, object); - specbind (Qposition, CHARPOS (*position)); - specbind (Qbuffer_position, (STRINGP (object) - ? make_number (IT_CHARPOS (*it)) - : make_number (CHARPOS (*position)))); + specbind (Qposition, make_number (CHARPOS (*position))); + specbind (Qbuffer_position, + make_number (STRINGP (object) + ? IT_CHARPOS (*it) : CHARPOS (*position))); GCPRO1 (form); form = safe_eval (form); UNGCPRO; -- 2.39.5