From 33fa85e0426e67f43963eaeebaf670fef94b69de Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 31 Oct 1998 23:39:42 +0000 Subject: (set_internal): For built-in maybe-local vars, when BINDFLAG is set, do not mark them as local. --- src/data.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/data.c b/src/data.c index bed8bda7b7..117c8f2ee5 100644 --- a/src/data.c +++ b/src/data.c @@ -980,7 +980,7 @@ set_internal (symbol, newval, bindflag) register int idx = XBUFFER_OBJFWD (valcontents)->offset; register int mask = XINT (*((Lisp_Object *) (idx + (char *)&buffer_local_flags))); - if (mask > 0) + if (mask > 0 && ! bindflag) current_buffer->local_var_flags |= mask; } -- cgit v1.2.3