From 5ce98430e8d9d08e7bc9c70a5894042b92a5ec07 Mon Sep 17 00:00:00 2001 From: Akib Azmain Turja Date: Tue, 29 Nov 2022 00:31:34 +0600 Subject: [PATCH] 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-\ '. --- eat.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/eat.el b/eat.el index db4db4b..0863dd3 100644 --- a/eat.el +++ b/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- keys. (unless (member `[,meta-prefix-char] exceptions)