Add a (broken) unit test to exemplify Bug#11218.
* test/lisp/emacs-lisp/ert-tests.el (ert-test-with-demoted-errors): New (broken) unit test.
This commit is contained in:
parent
f004b66bdb
commit
5804ac0b49
1 changed files with 5 additions and 0 deletions
|
@ -801,6 +801,11 @@ This macro is used to test if macroexpansion in `should' works."
|
|||
(should (eql 0 (ert-stats-completed-unexpected stats)))
|
||||
(should (eql 1 (ert-stats-skipped stats)))))
|
||||
|
||||
(ert-deftest ert-test-with-demoted-errors ()
|
||||
"Check that ERT correctly handles `with-demoted-errors'."
|
||||
:expected-result :failed ;; FIXME! Bug#11218
|
||||
(should-not (with-demoted-errors (error "Foo"))))
|
||||
|
||||
|
||||
(provide 'ert-tests)
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue