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:
Akib Azmain Turja 2022-11-29 00:31:34 +06:00
parent 31f93da3fd
commit 5ce98430e8
No known key found for this signature in database
GPG key ID: 5535FCF54D88616B

4
eat.el
View file

@ -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)