Merge branch 'scratch/long-lines-cleanup' into 'emacs-29'

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/subr.el b/lisp/subr.el
index 54b92fc8607..52227b5261c 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -3978,7 +3978,7 @@ same LABEL argument.
   "Helper function for `with-restriction', which see."
   (save-restriction
     (narrow-to-region start end)
-    (if label (internal--lock-narrowing label))
+    (if label (internal--label-restriction label))
     (funcall body)))
 
 (defmacro without-restriction (&rest rest)
@@ -4000,7 +4000,7 @@ are lifted.
 (defun internal--without-restriction (body &optional label)
   "Helper function for `without-restriction', which see."
   (save-restriction
-    (if label (internal--unlock-narrowing label))
+    (if label (internal--unlabel-restriction label))
     (widen)
     (funcall body)))