From 30e63ffd655f5fafb3e3bdb0aac99716ed097c5a Mon Sep 17 00:00:00 2001 From: Lockywolf Date: Wed, 28 Aug 2019 11:12:35 +0800 Subject: Add a (declare (debug)) form to all geiser-%s--with-buffer macros. --- elisp/geiser-popup.el | 1 + 1 file changed, 1 insertion(+) diff --git a/elisp/geiser-popup.el b/elisp/geiser-popup.el index 200c4ef..c4950df 100644 --- a/elisp/geiser-popup.el +++ b/elisp/geiser-popup.el @@ -52,6 +52,7 @@ ((eq ,method 'frame) (view-buffer-other-frame ,buffer)) (t (view-buffer-other-window ,buffer)))))) (defmacro ,with-macro (&rest body) + (declare (debug (&rest form))) (list 'with-current-buffer (list ',get-buff) (cons 'let (cons '((inhibit-read-only t)) body)))) (put ',with-macro 'lisp-indent-function 'defun)))) -- cgit v1.2.3