diff options
| author | Gregory Heytings <gregory@heytings.org> | 2024-01-11 23:38:22 +0000 |
|---|---|---|
| committer | Gregory Heytings <gregory@heytings.org> | 2024-01-14 21:59:21 +0000 |
| commit | 5bb5590dec95e813ed120b3f09734451b4ebb18f (patch) | |
| tree | e265fd29f4d73034d927213b4b9dd1a2be65f85e | |
| parent | 78ddb32fadb61b3e78047400e257d57b2cff7cd8 (diff) | |
| download | emacs-5bb5590dec9.tar.gz | |
Fix blunder in labeled_narrow_to_region
* src/editfns.c (labeled_narrow_to_region): Record point before,
instead of after, calling narrow-to-region; otherwise point may
already have been changed. Fixes bug#66764.
| -rw-r--r-- | src/editfns.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/editfns.c b/src/editfns.c index 063dfc6d131..6ddee0840c2 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -2870,9 +2870,9 @@ void labeled_narrow_to_region (Lisp_Object begv, Lisp_Object zv, Lisp_Object label) { - Finternal__labeled_narrow_to_region (begv, zv, label); record_unwind_protect (restore_point_unwind, Fpoint_marker ()); record_unwind_protect (unwind_labeled_narrow_to_region, label); + Finternal__labeled_narrow_to_region (begv, zv, label); } DEFUN ("widen", Fwiden, Swiden, 0, 0, "", |