From c1f79cc67ca6137e2ef6a2e2ff952dac779f37c0 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Thu, 25 Jan 2018 17:21:05 +0100 Subject: [PATCH] Add debug property to macros in files-tests.el * test/lisp/files-tests.el (files-tests--with-temp-file) (files-tests--with-temp-dir): Give them the `debug' property. --- test/lisp/files-tests.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el index 4738a50b434..c4c82077016 100644 --- a/test/lisp/files-tests.el +++ b/test/lisp/files-tests.el @@ -282,7 +282,7 @@ be $HOME." (advice-remove #',symbol ,function))))) (defmacro files-tests--with-temp-file (name &rest body) - (declare (indent 1)) + (declare (indent 1) (debug (symbolp body))) (cl-check-type name symbol) `(let ((,name (make-temp-file "emacs"))) (unwind-protect @@ -290,7 +290,7 @@ be $HOME." (delete-file ,name)))) (defmacro files-tests--with-temp-dir (name &rest body) - (declare (indent 1)) + (declare (indent 1) (debug (symbolp body))) (cl-check-type name symbol) `(let ((,name (make-temp-file "emacs" t))) (unwind-protect -- 2.39.5