emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] scratch/nonspecial-handlers c1f79cc: Add debug property to


From: Michael Albinus
Subject: [Emacs-diffs] scratch/nonspecial-handlers c1f79cc: Add debug property to macros in files-tests.el
Date: Thu, 25 Jan 2018 11:24:54 -0500 (EST)

branch: scratch/nonspecial-handlers
commit c1f79cc67ca6137e2ef6a2e2ff952dac779f37c0
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    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 4738a50..c4c8207 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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]