From 32e737b145fef05105e2bad4ca34ca41072e9569 Mon Sep 17 00:00:00 2001 From: Daniel Mendler Date: Fri, 10 Mar 2023 00:03:22 +0100 Subject: with-restriction, without-restriction: Add declare specification --- compat-29.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/compat-29.el b/compat-29.el index 5cfe154..fee1f5c 100644 --- a/compat-29.el +++ b/compat-29.el @@ -306,6 +306,7 @@ to other portions of the buffer, use `without-restriction' with the same LABEL argument. \(fn START END [:label LABEL] BODY)" + (declare (indent 0) (debug t)) `(save-restriction (narrow-to-region ,start ,end) ;; Locking is ignored @@ -321,6 +322,7 @@ restrictions set by `with-restriction' with the same LABEL argument are lifted. \(fn [:label LABEL] BODY)" + (declare (indent 0) (debug t)) `(save-restriction (widen) ;; Locking is ignored -- cgit v1.0