From ccd7ab84c5a8685c66ee1b62cb486c00edd2d992 Mon Sep 17 00:00:00 2001 From: Philip Kaludercic Date: Fri, 11 Nov 2022 18:32:13 +0100 Subject: [PATCH] Fix edebug spec for 'package--with-response-buffer' * lisp/emacs-lisp/package.el (package--with-response-buffer): Add a spec that makes the macro debuggable. --- lisp/emacs-lisp/package.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el index 8e6e7b7dcf8..23e0bb15d0a 100644 --- a/lisp/emacs-lisp/package.el +++ b/lisp/emacs-lisp/package.el @@ -1363,10 +1363,7 @@ is non-nil, don't propagate connection errors (does not apply to errors signaled by ERROR-FORM or by BODY). \(fn URL &key ASYNC FILE ERROR-FORM NOERROR &rest BODY)" - (declare (indent defun) - ;; FIXME: This should be something like - ;; `form def-body &rest form', but that doesn't work. - (debug (form &rest sexp))) + (declare (indent defun) (debug (sexp body))) (while (keywordp (car body)) (setq body (cdr (cdr body)))) `(package--with-response-buffer-1 ,url (lambda () ,@body) -- 2.39.2