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:
parent
ec22e923c0
commit
95856c5154
2 changed files with 4 additions and 1 deletions
|
|
@ -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."
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue