aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/lisp/progmodes/flymake-tests.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/test/lisp/progmodes/flymake-tests.el b/test/lisp/progmodes/flymake-tests.el
index 921c2f648a4..fa77a9a8ae6 100644
--- a/test/lisp/progmodes/flymake-tests.el
+++ b/test/lisp/progmodes/flymake-tests.el
@@ -129,7 +129,8 @@ SEVERITY-PREDICATE is used to setup
129 (should (eq 'flymake-warning (face-at-point))) 129 (should (eq 'flymake-warning (face-at-point)))
130 (flymake-goto-next-error) 130 (flymake-goto-next-error)
131 (should (eq 'flymake-error (face-at-point))) 131 (should (eq 'flymake-error (face-at-point)))
132 (should-error (flymake-goto-next-error nil t)) )) 132 (let ((flymake-wrap-around nil))
133 (should-error (flymake-goto-next-error nil nil t))) ))
133 134
134(defmacro flymake-tests--assert-set (set 135(defmacro flymake-tests--assert-set (set
135 should 136 should
@@ -244,7 +245,8 @@ SEVERITY-PREDICATE is used to setup
244 (should (eq 'flymake-warning (face-at-point))) ; dolor 245 (should (eq 'flymake-warning (face-at-point))) ; dolor
245 (flymake-goto-next-error) 246 (flymake-goto-next-error)
246 (should (eq 'flymake-error (face-at-point))) ; prognata 247 (should (eq 'flymake-error (face-at-point))) ; prognata
247 (should-error (flymake-goto-next-error nil t)))))) 248 (let ((flymake-wrap-around nil))
249 (should-error (flymake-goto-next-error nil nil t)))))))
248 250
249(provide 'flymake-tests) 251(provide 'flymake-tests)
250 252