aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorSean Allred <code@seanallred.com>2014-11-12 17:58:10 -0500
committerSean Allred <code@seanallred.com>2014-11-12 17:58:10 -0500
commit2c172707073d6a8e558d81999d0ef14b60acb0af (patch)
tree65a487cc3e5a6abab3a73ffda63b40504bb02869 /test
parent9c2e07f01f41c223b07356c4bd495e6f7edd1d0f (diff)
Move defmacro to head of file
Diffstat (limited to 'test')
-rw-r--r--test/tests.el16
1 files changed, 8 insertions, 8 deletions
diff --git a/test/tests.el b/test/tests.el
index a66394c..b48761d 100644
--- a/test/tests.el
+++ b/test/tests.el
@@ -20,6 +20,14 @@
(insert-file-contents file)
(read (buffer-string))))))
+(defmacro line-should-match (regexp)
+ ""
+ `(let ((line (buffer-substring-no-properties
+ (line-beginning-position)
+ (line-end-position))))
+ (message "Line here is: %S" line)
+ (should (string-match ,regexp line))))
+
(setq
sx-request-remaining-api-requests-message-threshold 50000
debug-on-error t
@@ -89,14 +97,6 @@
((1 . alpha) (2 . beta))]
'(1 2 3)))))
-(defmacro line-should-match (regexp)
- ""
- `(let ((line (buffer-substring-no-properties
- (line-beginning-position)
- (line-end-position))))
- (message "Line here is: %S" line)
- (should (string-match ,regexp line))))
-
(ert-deftest question-list-display ()
(cl-letf (((symbol-function #'sx-request-make)
(lambda (&rest _) sx-test-data-questions)))