1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00

Add face to mouse buttons in command substitutions

* lisp/help.el (substitute-command-keys): Add help-key-binding face to
mouse buttons in literal key substitutions.
* test/lisp/help-tests.el
(help-tests-substitute-command-keys/literal-key-sequence): Expand
test for above change.
This commit is contained in:
Stefan Kangas 2022-08-03 16:08:17 +02:00
parent ec22e923c0
commit 95856c5154
2 changed files with 4 additions and 1 deletions

View file

@ -93,7 +93,9 @@
(with-substitute-command-keys-test
(test "\\`C-m'" "C-m")
(test "\\`C-m'\\`C-j'" "C-mC-j")
(test "foo\\`C-m'bar\\`C-j'baz" "fooC-mbarC-jbaz")))
(test "foo\\`C-m'bar\\`C-j'baz" "fooC-mbarC-jbaz")
(test "\\`M-x next-line'" "M-x next-line")
(test "\\`mouse-1'" "mouse-1")))
(ert-deftest help-tests-substitute-command-keys/literal-key-sequence-ignore-invalid ()
"Ignore any invalid literal key sequence."