From ae5c608eca636ad1c5c76294d81f16a16d2ec3b5 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 7 Apr 2025 11:54:06 -0400 Subject: [PATCH] (Freplace_region_contents): Fix point preservation (bug#77607) * src/editfns.c (Freplace_region_contents): Save excursion around temporary restriction (bug#77607) and remove `record_unwind_protect_excursion` made redundant by commit 40d8650d5177. --- src/editfns.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/editfns.c b/src/editfns.c index 9590b49dc25..669d3cdb140 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -1968,6 +1968,7 @@ a buffer or a string. But this is deprecated. */) if (FUNCTIONP (source)) { specpdl_ref count = SPECPDL_INDEX (); + record_unwind_protect_excursion (); record_unwind_protect (save_restriction_restore, save_restriction_save ()); Fnarrow_to_region (beg, end); @@ -2119,7 +2120,6 @@ a buffer or a string. But this is deprecated. */) Fundo_boundary (); bool modification_hooks_inhibited = false; - record_unwind_protect_excursion (); /* We are going to make a lot of small modifications, and having the modification hooks called for each of them will slow us down.