procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix edebug spec for 'package--with-response-buffer'

Browse source 
* lisp/emacs-lisp/package.el (package--with-response-buffer): Add a
spec that makes the macro debuggable.
This commit is contained in:
Philip Kaludercic 2022-11-11 18:32:13 +01:00
parent 7c3d3fa44e
commit ccd7ab84c5
1 changed files with 1 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/emacs-lisp/package.el
View file

@ -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)