; ert-x: Add test for buffer read-only state
This test should have been included with commit
29b7d74000
.
* test/lisp/emacs-lisp/ert-x-tests.el
(ert-test-with-test-buffer-selected/read-only): New test.
(Bug#60189)
This commit is contained in:
parent
0e39ad6fa5
commit
38c6abe4d0
1 changed files with 5 additions and 0 deletions
|
@ -90,6 +90,11 @@
|
|||
(ert-with-test-buffer-selected ()
|
||||
(should (null inhibit-modification-hooks))))
|
||||
|
||||
(ert-deftest ert-test-with-test-buffer-selected/read-only ()
|
||||
(ert-with-test-buffer-selected ()
|
||||
(should (null inhibit-read-only))
|
||||
(should (null buffer-read-only))))
|
||||
|
||||
(ert-deftest ert-test-with-test-buffer-selected/return-value ()
|
||||
(should (equal (ert-with-test-buffer-selected () "foo") "foo")))
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue