From c8daa71db73e6f9bfbf9b7d23477d8e885fe8d64 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(+) (limited to 'elisp/geiser-popup.el') 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