procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Test that substitute-command-keys preserves text properties

Browse source 
* test/lisp/help-tests.el
(help-substitute-command-keys/preserves-text-properties): New test.
(Bug#17052)
This commit is contained in:
Stefan Kangas 2020-11-17 02:17:14 +01:00
parent 45a1653afa
commit 27655f9f38
1 changed files with 6 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
test/lisp/help-tests.el
View file

@ -392,6 +392,12 @@ C-b undefined
(define-key global-map (kbd "C-c C-l r") nil)
(define-key global-map (kbd "C-c C-l") nil)))
(ert-deftest help-substitute-command-keys/preserves-text-properties ()
"Check that we preserve text properties (Bug#17052)."
(should (equal (substitute-command-keys
(propertize "foo \\[save-buffer]" 'face 'bold))
(propertize "foo C-x C-s" 'face 'bold))))
(provide 'help-tests)
;;; help-tests.el ends here