* test/lisp/format-spec-tests.el (test-format-unknown): Use `should-error'.

This commit is contained in:
Michael Albinus 2019-07-11 20:01:57 +02:00
parent b44f0c4579
commit 37cb129979

View file

@ -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)