From cbc55f55696b257a75007fefbfc57bec7dc67ab8 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 22 Jul 1995 16:11:48 +0000 Subject: [PATCH] (Fget_char_property): If OBJECT is non-current buffer, use it properly for overlays_at. --- src/textprop.c | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/textprop.c b/src/textprop.c index 5b8dada6042..c41757388c7 100644 --- a/src/textprop.c +++ b/src/textprop.c @@ -556,6 +556,9 @@ overlays are considered only if they are associated with OBJECT.") Lisp_Object *overlay_vec, tem; int next_overlay; int len; + struct buffer *obuf = current_buffer; + + set_buffer_temp (XBUFFER (object)); /* First try with room for 40 overlays. */ len = 40; @@ -575,6 +578,8 @@ overlays are considered only if they are associated with OBJECT.") } noverlays = sort_overlays (overlay_vec, noverlays, w); + set_buffer_temp (obuf); + /* Now check the overlays in order of decreasing priority. */ while (--noverlays >= 0) { -- 2.39.2