# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 909877182 0
# Node ID 6c27d8ed0867defaa430d7732ff08919421d5e5e
# Parent  0049f95b12a705d812d3dc2ea843ee193ce8be0e
(set_internal): For built-in maybe-local vars,
when BINDFLAG is set, do not mark them as local.

diff -r 0049f95b12a7 -r 6c27d8ed0867 src/data.c
--- a/src/data.c	Sat Oct 31 22:55:26 1998 +0000
+++ b/src/data.c	Sat Oct 31 23:39:42 1998 +0000
@@ -980,7 +980,7 @@
       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;
     }