diff options
| author | Lockywolf <lockywolf@gmail.com> | 2019-08-28 11:12:35 +0800 |
|---|---|---|
| committer | Lockywolf <lockywolf@gmail.com> | 2019-09-03 15:06:02 +0800 |
| commit | c8daa71db73e6f9bfbf9b7d23477d8e885fe8d64 (patch) | |
| tree | 7b934a537fc82bd91478a0a178e97ede083b1195 | |
| parent | b02dfd702aa7889c8c18f1e3ecd4c1b83b32e70c (diff) | |
| download | geiser-c8daa71db73e6f9bfbf9b7d23477d8e885fe8d64.tar.gz geiser-c8daa71db73e6f9bfbf9b7d23477d8e885fe8d64.tar.bz2 | |
Add a (declare (debug)) form to all geiser-%s--with-buffer macros.
| -rw-r--r-- | elisp/geiser-popup.el | 1 |
1 files changed, 1 insertions, 0 deletions
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)))) |