From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Mon, 31 Jan 2022 02:31:01 +0000 (+0100)
Subject: Fix with-suppressed-warnings edebug spec
X-Git-Tag: emacs-29.0.90~2643
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7b137370558e8924a8282880bdffe84ff8324d28;p=emacs.git

Fix with-suppressed-warnings edebug spec

* lisp/emacs-lisp/byte-run.el (with-suppressed-warnings): Fix
edebug spec.
---

diff --git a/lisp/emacs-lisp/byte-run.el b/lisp/emacs-lisp/byte-run.el
index fedc10cea44..110f7e4abf4 100644
--- a/lisp/emacs-lisp/byte-run.el
+++ b/lisp/emacs-lisp/byte-run.el
@@ -656,7 +656,7 @@ For the `mapcar' case, only the `mapcar' function can be used in
 the symbol list.  For `suspicious', only `set-buffer' can be used."
   ;; Note: during compilation, this definition is overridden by the one in
   ;; byte-compile-initial-macro-environment.
-  (declare (debug (sexp &optional body)) (indent 1))
+  (declare (debug (sexp body)) (indent 1))
   (if (not (and (featurep 'macroexp)
                 (boundp 'byte-compile--suppressed-warnings)))
       ;; If `macroexp' is not yet loaded, we're in the middle of