[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 37cb129: * test/lisp/format-spec-tests.el (test-for
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 37cb129: * test/lisp/format-spec-tests.el (test-format-unknown): Use `should-error'. |
Date: |
Thu, 11 Jul 2019 14:02:09 -0400 (EDT) |
branch: master
commit 37cb129979ff1342e1b567a6f5307a0b1e1ff962
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
* test/lisp/format-spec-tests.el (test-format-unknown): Use `should-error'.
---
test/lisp/format-spec-tests.el | 5 +----
1 file changed, 1 insertion(+), 4 deletions(-)
diff --git a/test/lisp/format-spec-tests.el b/test/lisp/format-spec-tests.el
index e831657..6fbfaaa 100644
--- a/test/lisp/format-spec-tests.el
+++ b/test/lisp/format-spec-tests.el
@@ -31,10 +31,7 @@
"foo bar zot")))
(ert-deftest test-format-unknown ()
- (should (eq (condition-case _
- (format-spec "foo %b %z zot" '((?b . "bar")))
- (error :error))
- :error))
+ (should-error (format-spec "foo %b %z zot" '((?b . "bar"))))
(should (equal (format-spec "foo %b %z zot" '((?b . "bar")) t)
"foo bar %z zot"))
(should (equal (format-spec "foo %b %z %% zot" '((?b . "bar")) t)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 37cb129: * test/lisp/format-spec-tests.el (test-format-unknown): Use `should-error'.,
Michael Albinus <=