Distinguish C-m from RET

But you must bind keys to "<C-m>" or [C-m] to target it.
This commit is contained in:
Henrik Lissner 2021-05-16 14:44:53 -04:00
parent eaa32572b9
commit 3b0f23792d

View file

@ -56,6 +56,15 @@ and Emacs states, and for non-evil users.")
(not (or (numberp key) (null key))))))
[C-i] [?\C-i])))
;; HACK Fixes Emacs' disturbing inability to distinguish C-m from RET. We don't
;; need the same hacks as C-i because *nobody* binds keys to C-m otherwise.
(define-key key-translation-map [?\C-m]
(cmd! (if (let ((keys (this-single-command-raw-keys)))
(and keys
(not (cl-position 'return keys))
(display-graphic-p)))
[C-m] [?\C-m])))
;;
;;; Universal, non-nuclear escape