487 |
clone_per_buffer_values (from, to) |
clone_per_buffer_values (from, to) |
488 |
struct buffer *from, *to; |
struct buffer *from, *to; |
489 |
{ |
{ |
490 |
Lisp_Object to_buffer; |
Lisp_Object to_buffer, tem; |
491 |
int offset; |
int offset; |
492 |
|
|
493 |
XSETBUFFER (to_buffer, to); |
XSETBUFFER (to_buffer, to); |
514 |
|
|
515 |
to->overlays_before = copy_overlays (to, from->overlays_before); |
to->overlays_before = copy_overlays (to, from->overlays_before); |
516 |
to->overlays_after = copy_overlays (to, from->overlays_after); |
to->overlays_after = copy_overlays (to, from->overlays_after); |
517 |
|
|
518 |
|
/* Copy the alist of local variables, |
519 |
|
and all the alist elements too. */ |
520 |
|
to->local_var_alist |
521 |
|
= Fcopy_sequence (from->local_var_alist); |
522 |
|
for (tem = to->local_var_alist; CONSP (tem); |
523 |
|
tem = XCDR (tem)) |
524 |
|
XSETCAR (tem, Fcons (XCAR (XCAR (tem)), XCDR (XCAR (tem)))); |
525 |
} |
} |
526 |
|
|
527 |
|
|