diff options
| author | dickmao | 2021-11-02 15:28:20 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-11-02 15:28:52 +0100 |
| commit | ff5327d72a68c149fb8ab210e21a1e7bb94fcc55 (patch) | |
| tree | 0b965eeb0176a852608bab8e746c9651f8e087f7 /test/src | |
| parent | 33263b610e46f3ce5f979dfbf0c8a314fc0e4f35 (diff) | |
| download | emacs-ff5327d72a68c149fb8ab210e21a1e7bb94fcc55.tar.gz emacs-ff5327d72a68c149fb8ab210e21a1e7bb94fcc55.zip | |
Update keymap-tests after recent changes
* test/src/keymap-tests.el
(help--describe-vector/bug-9293-one-shadowed-in-range): Update tests
for d530f3f9ff.
(help--describe-vector/bug-9293-same-command-does-not-shadow): Update
(bug#51567).
Diffstat (limited to 'test/src')
| -rw-r--r-- | test/src/keymap-tests.el | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/test/src/keymap-tests.el b/test/src/keymap-tests.el index d3cb1a6a550..8e28faf2b26 100644 --- a/test/src/keymap-tests.el +++ b/test/src/keymap-tests.el | |||
| @@ -323,12 +323,12 @@ commit 86c19714b097aa477d339ed99ffb5136c755a046." | |||
| 323 | (with-temp-buffer | 323 | (with-temp-buffer |
| 324 | (help--describe-vector (cadr orig-map) nil #'help--describe-command | 324 | (help--describe-vector (cadr orig-map) nil #'help--describe-command |
| 325 | t shadow-map orig-map t) | 325 | t shadow-map orig-map t) |
| 326 | (should (equal (buffer-string) | 326 | (should (equal (buffer-substring-no-properties (point-min) (point-max)) |
| 327 | " | 327 | (string-replace "\t" "" " |
| 328 | e foo | 328 | e foo |
| 329 | f foo (currently shadowed by `bar') | 329 | f foo (currently shadowed by `bar') |
| 330 | g .. h foo | 330 | g .. h foo |
| 331 | "))))) | 331 | ")))))) |
| 332 | 332 | ||
| 333 | (ert-deftest help--describe-vector/bug-9293-same-command-does-not-shadow () | 333 | (ert-deftest help--describe-vector/bug-9293-same-command-does-not-shadow () |
| 334 | "Check that a command can't be shadowed by the same command." | 334 | "Check that a command can't be shadowed by the same command." |
| @@ -349,10 +349,10 @@ g .. h foo | |||
| 349 | (with-temp-buffer | 349 | (with-temp-buffer |
| 350 | (help--describe-vector (cadr range-map) nil #'help--describe-command | 350 | (help--describe-vector (cadr range-map) nil #'help--describe-command |
| 351 | t shadow-map range-map t) | 351 | t shadow-map range-map t) |
| 352 | (should (equal (buffer-string) | 352 | (should (equal (buffer-substring-no-properties (point-min) (point-max)) |
| 353 | " | 353 | (string-replace "\t" "" " |
| 354 | 0 .. 3 foo | 354 | 0 .. 3 foo |
| 355 | "))))) | 355 | ")))))) |
| 356 | 356 | ||
| 357 | (ert-deftest keymap--key-description () | 357 | (ert-deftest keymap--key-description () |
| 358 | (should (equal (key-description [right] [?\C-x]) | 358 | (should (equal (key-description [right] [?\C-x]) |