scratch/package-vc-fixes 58b2a64225 23/48: Fix edebug spec for 'package--with-response-buffer'

[Philip Kaludercic]

branch: scratch/package-vc-fixes
commit 58b2a64225c4694a773a75875c516343dd16d784
Author: Philip Kaludercic <philipk@posteo.net>
Commit: Philip Kaludercic <philipk@posteo.net>

    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 d5874dee06..893b3617bb 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1382,10 +1382,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)