mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-02 02:10:46 -08:00
(clone_per_buffer_values): Skip `name'.
This commit is contained in:
parent
f7ed19a3ee
commit
4b7cdc0edd
2 changed files with 9 additions and 1 deletions
|
|
@ -1,3 +1,7 @@
|
|||
2008-06-11 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* buffer.c (clone_per_buffer_values): Skip `name'.
|
||||
|
||||
2008-06-11 Chong Yidong <cyd@stupidchicken.com>
|
||||
|
||||
* font.c (font_parse_fcname): Fix last change; accept decimal
|
||||
|
|
|
|||
|
|
@ -496,12 +496,16 @@ clone_per_buffer_values (from, to)
|
|||
|
||||
/* buffer-local Lisp variables start at `undo_list',
|
||||
tho only the ones from `name' on are GC'd normally. */
|
||||
for (offset = PER_BUFFER_VAR_OFFSET (undo_list) + sizeof (Lisp_Object);
|
||||
for (offset = PER_BUFFER_VAR_OFFSET (undo_list);
|
||||
offset < sizeof *to;
|
||||
offset += sizeof (Lisp_Object))
|
||||
{
|
||||
Lisp_Object obj;
|
||||
|
||||
/* Don't touch the `name' which should be unique for every buffer. */
|
||||
if (offset == PER_BUFFER_VAR_OFFSET (name))
|
||||
continue;
|
||||
|
||||
obj = PER_BUFFER_VALUE (from, offset);
|
||||
if (MARKERP (obj))
|
||||
{
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue