diff options
| author | Gregory Heytings <gregory@heytings.org> | 2023-03-28 23:06:55 +0000 |
|---|---|---|
| committer | Gregory Heytings <gregory@heytings.org> | 2023-03-29 01:12:36 +0200 |
| commit | 7e26a5c774e7c71782d89abe1d4be125d8422a4b (patch) | |
| tree | 7e9ab1f0c27dc2945ff89cd595a30450925e0227 /src/lread.c | |
| parent | 85ed1c9ca6b786763740766d77b1f806c2f301a1 (diff) | |
| download | emacs-7e26a5c774e7c71782d89abe1d4be125d8422a4b.tar.gz emacs-7e26a5c774e7c71782d89abe1d4be125d8422a4b.tar.bz2 emacs-7e26a5c774e7c71782d89abe1d4be125d8422a4b.zip | |
Remove labeled restrictions before calling Fwiden
* src/editfns.c (labeled_restrictions_remove_in_current_buffer):
New function.
* src/lisp.h: Make it externally visible.
* src/xdisp.c (display_count_lines_logically):
* src/lread.c (readevalloop):
* src/indent.c (line_number_display_width):
* src/fileio.c (write_region):
* src/callproc.c (Fcall_process_region):
* src/buffer.c (Ferase_buffer): Use it.
Diffstat (limited to 'src/lread.c')
| -rw-r--r-- | src/lread.c | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/lread.c b/src/lread.c index d0dc85f51c8..342d367d985 100644 --- a/src/lread.c +++ b/src/lread.c @@ -2255,6 +2255,7 @@ readevalloop (Lisp_Object readcharfun, record_unwind_protect_excursion (); /* Save ZV in it. */ record_unwind_protect (save_restriction_restore, save_restriction_save ()); + labeled_restrictions_remove_in_current_buffer (); /* Those get unbound after we read one expression. */ /* Set point and ZV around stuff to be read. */ |