Mercurial > emacs

comparison src/data.c @ 23602:6c27d8ed0867

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(set_internal): For built-in maybe-local vars, when BINDFLAG is set, do not mark them as local.
author Richard M. Stallman <rms@gnu.org>
date Sat, 31 Oct 1998 23:39:42 +0000
parents 8fc72562fce6
children 07b44154638f
comparison
equal deleted inserted replaced
23601:0049f95b12a7 23602:6c27d8ed0867
978 if (BUFFER_OBJFWDP (valcontents)) 978 if (BUFFER_OBJFWDP (valcontents))
979 { 979 {
980 register int idx = XBUFFER_OBJFWD (valcontents)->offset; 980 register int idx = XBUFFER_OBJFWD (valcontents)->offset;
981 register int mask = XINT (*((Lisp_Object *) 981 register int mask = XINT (*((Lisp_Object *)
982 (idx + (char *)&buffer_local_flags))); 982 (idx + (char *)&buffer_local_flags)));
983 if (mask > 0) 983 if (mask > 0 && ! bindflag)
984 current_buffer->local_var_flags |= mask; 984 current_buffer->local_var_flags |= mask;
985 } 985 }
986 986
987 else if (BUFFER_LOCAL_VALUEP (valcontents) 987 else if (BUFFER_LOCAL_VALUEP (valcontents)
988 || SOME_BUFFER_LOCAL_VALUEP (valcontents)) 988 || SOME_BUFFER_LOCAL_VALUEP (valcontents))