[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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] scratch/nonspecial-handlers c1f79cc: Add debug property to macros in files-tests.el,
Michael Albinus <=