From: Michael Albinus <michael.albinus@gmx.de>
Date: Thu, 25 Jan 2018 16:21:05 +0000 (+0100)
Subject: Add debug property to macros in files-tests.el
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c1f79cc67ca6137e2ef6a2e2ff952dac779f37c0;p=emacs.git

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.
---

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