Use more readable '?\C-\s' instead of '?\C-\ '
* eat.el (eat-term-input-event, eat-term-make-keymap): Use more readable '?\C-\s' instead of '?\C-\ '.
This commit is contained in:
parent
31f93da3fd
commit
5ce98430e8
1 changed files with 2 additions and 2 deletions
4
eat.el
4
eat.el
|
@ -4557,7 +4557,7 @@ client process may get confused."
|
|||
(let ((ch (pcase (event-convert-list
|
||||
(append (remq 'meta mods)
|
||||
(list base)))
|
||||
(?\C-\ ?\C-@)
|
||||
(?\C-\s ?\C-@)
|
||||
(?\C-/ ?\C-?)
|
||||
(?\C-- ?\C-_)
|
||||
(c c))))
|
||||
|
@ -4789,7 +4789,7 @@ EXCEPTIONS is a list of key sequences to not bind. Don't use
|
|||
M-S-deletechar C-M-S-deletechar))
|
||||
(bind `[,key]))
|
||||
;; Bind these non-encodable keys. They are translated.
|
||||
(dolist (key '(?\C-- ?\C-? ?\C-\ ))
|
||||
(dolist (key '(?\C-- ?\C-? ?\C-\s))
|
||||
(bind `[,key]))
|
||||
;; Bind M-<ASCII> keys.
|
||||
(unless (member `[,meta-prefix-char] exceptions)
|
||||
|
|
Loading…
Add table
Reference in a new issue