diff options
| author | Mattias EngdegÄrd | 2022-06-18 11:08:23 +0200 |
|---|---|---|
| committer | Mattias EngdegÄrd | 2022-06-18 11:22:58 +0200 |
| commit | e321f87aa76c959faed784851b65ab7ada3fd129 (patch) | |
| tree | 0f3450adff77e3a73df7b5786c39333b58e09e97 /test | |
| parent | 15238e2ed0eeba82fd43efbbd4b9237394f9fd55 (diff) | |
| download | emacs-e321f87aa76c959faed784851b65ab7ada3fd129.tar.gz emacs-e321f87aa76c959faed784851b65ab7ada3fd129.zip | |
Avoid "control-control-KEY" (bug#55738)
Constructs such as ?\C-^@ or ?\C-\C-m literally apply a Control
modifier twice which doesn't make sense at all. What is really meant
is a C0 base character with the Control modifier bit set.
This change is only stylistic in nature.
* lisp/edmacro.el (edmacro-format-keys):
* lisp/keymap.el (key-parse):
* lisp/subr.el (event-modifiers, event-basic-type):
* test/lisp/subr-tests.el (subr-test-kbd):
Use \0 and \r instead of ^@ and \C-m to represent NUL and RET
when combined with other modifiers.
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/subr-tests.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/subr-tests.el b/test/lisp/subr-tests.el index a25eb363b01..45dd2d71603 100644 --- a/test/lisp/subr-tests.el +++ b/test/lisp/subr-tests.el | |||
| @@ -112,7 +112,7 @@ | |||
| 112 | (should (equal (kbd "C-x C-f") "\C-x\C-f")) | 112 | (should (equal (kbd "C-x C-f") "\C-x\C-f")) |
| 113 | (should (equal (kbd "C-M-<down>") [C-M-down])) | 113 | (should (equal (kbd "C-M-<down>") [C-M-down])) |
| 114 | (should (equal (kbd "<C-M-down>") [C-M-down])) | 114 | (should (equal (kbd "<C-M-down>") [C-M-down])) |
| 115 | (should (equal (kbd "C-RET") [?\C-\C-m])) | 115 | (should (equal (kbd "C-RET") [?\C-\r])) |
| 116 | (should (equal (kbd "C-SPC") [?\C- ])) | 116 | (should (equal (kbd "C-SPC") [?\C- ])) |
| 117 | (should (equal (kbd "C-TAB") [?\C-\t])) | 117 | (should (equal (kbd "C-TAB") [?\C-\t])) |
| 118 | (should (equal (kbd "C-<down>") [C-down])) | 118 | (should (equal (kbd "C-<down>") [C-down])) |