diff options
author | Richard M. Stallman <[email protected]> | 1998-10-31 23:39:42 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 1998-10-31 23:39:42 +0000 |
commit | 33fa85e0426e67f43963eaeebaf670fef94b69de (patch) | |
tree | e26058dec1e59c81a0bf5d6b0ca56f970d2a32a2 | |
parent | 46a3b2b49b1b9c697fc80721f89cdc57779da812 (diff) |
(set_internal): For built-in maybe-local vars,
when BINDFLAG is set, do not mark them as local.
-rw-r--r-- | src/data.c | 2 |
1 files changed, 1 insertions, 1 deletions
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; } |