]> git.eshelyaron.com Git - emacs.git/commitdiff
* test/lisp/format-spec-tests.el (test-format-unknown): Use `should-error'.
authorMichael Albinus <michael.albinus@gmx.de>
Thu, 11 Jul 2019 18:01:57 +0000 (20:01 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Thu, 11 Jul 2019 18:01:57 +0000 (20:01 +0200)
test/lisp/format-spec-tests.el

index e831657a3e65b161c3b387620586fd5fc75ce58d..6fbfaaad83a9c6bad238f63ffd0e183691a4aa1f 100644 (file)
                  "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)