mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-29 19:48:19 +00:00
; Test for Bug#32014
* test/lisp/emacs-lisp/lisp-mode-tests.el (lisp-indent-with-read-only-field): New test.
This commit is contained in:
parent
90d95b000c
commit
db3f779780
@ -224,6 +224,17 @@ Expected initialization file: `%s'\"
|
||||
(comment-indent)
|
||||
(should (equal (buffer-string) correct)))))
|
||||
|
||||
(ert-deftest lisp-indent-with-read-only-field ()
|
||||
"Test indentation on line with read-only field (Bug#32014)."
|
||||
:expected-result :failed
|
||||
(with-temp-buffer
|
||||
(insert (propertize "prompt> " 'field 'output 'read-only t
|
||||
'rear-nonsticky t 'front-sticky '(read-only)))
|
||||
(insert " foo")
|
||||
(lisp-indent-line)
|
||||
(should (equal (buffer-string) "prompt> foo"))))
|
||||
|
||||
|
||||
|
||||
(provide 'lisp-mode-tests)
|
||||
;;; lisp-mode-tests.el ends here
|
||||
|
Loading…
Reference in New Issue
Block a user