Strange Emacs поведение клавишного ввода

Question

У меня всегда была эта странная проблема с Emacs, что я действительно хочу найти решение, но не могу найти. По умолчанию ключевая карта ESC ESC ESC (три выхода) отображается на клавиатуру-escape-quit, которая работает нормально, но если я нажимаю ESC только два типа, а затем нажимаю клавишу со стрелкой, она вставляет специальные символы в мой текст, который у меня всегда есть для повтора удаления, чтобы избавиться. Другими словами, я получаю такое поведение:

ESC ESC вверх -> OA

ESC ESC вниз -> OB

ESC ESC право -> OC

ESC ESC слева -> OD

Когда я использую \ CH K, чтобы найти, какие функции эти клавиши были сопоставлены с ним, отображается ESC ESC ESC, который отображается на keyboad-escape-quit.

Есть ли у кого-нибудь решение, как избавиться от этого раздражающего связывания ключей? Обратите внимание, что я использую Emacs в терминале.

Спасибо

Answer 1

Сэм описал проблему, но для общего решения вам в основном нужно научить Emacs различать ESC, полученный в ответ на то, что вы нажмете клавишу «Escape» из ESC, полученного как часть «escape-последовательности», , Конечно, в целом это невозможно сделать, но на практике вы можете проверить время: если за ESC следует немного времени простоя, то это, вероятно, «клавиша эвакуации», и в противном случае это, вероятно, escape-последовательность ".

Этот прием используется в VI эмуляторов, таких как Viper или Зла:

(defvar viper-fast-keyseq-timeout 200) 

(defun viper--tty-ESC-filter (map) 
    (if (and (equal (this-single-command-keys) [?\e]) 
      (sit-for (/ viper-fast-keyseq-timeout 1000.0))) 
     [escape] map)) 

(defun viper--lookup-key (map key) 
    (catch 'found 
    (map-keymap (lambda (k b) (if (equal key k) (throw 'found b))) map))) 

(defun viper-catch-tty-ESC() 
    "Setup key mappings of current terminal to turn a tty's ESC into `escape'." 
    (when (memq (terminal-live-p (frame-terminal)) '(t pc)) 
    (let ((esc-binding (viper--lookup-key input-decode-map ?\e))) 
     (define-key input-decode-map 
     [?\e] `(menu-item "" ,esc-binding :filter viper--tty-ESC-filter))))) 

Если вы звоните viper-catch-tty-ESC, он будет настроить декодирование таким образом, что нажав клавишу побег теперь должен генерировать escape событие (вместо ESC события). Это автоматически будет отображаться на ESC, если нет привязки для escape, благодаря привязке в function-key-map (это используется в режиме графического интерфейса, в котором ключ эвакуации действительно отправляет событие escape).

Обратите внимание, что это не устранит вашу проблему: «ESC ESC up» по-прежнему будет вставлять «OA». Проблема в том, что на клавиатурный перевод Emacs по-прежнему будет отображаться «ESC ESC ESC O A» (первые два появятся в раунде, пройдя через escape и обратно). Таким образом, чтобы окончательно решить эту проблему, вам дополнительно нужно удалить «ESC ESC ESC» связывание и заменить его с привязкой, который будет срабатывать только с новым escape события:

(global-unset-key [?\e ?\e ?\e]) 
(global-set-key [?\e ?\e escape] 'keyboard-escape-quit) 

Примечания: Это все сложное дело , Я хорошо знаком с соответствующим кодом, но мои первые две попытки при написании этого ответа не удались из-за некоторого взаимодействия, которого я не ожидал.

Answer 2

Клавиши со стрелками генерируют escape-последовательности. НАПРИМЕР, если вы начинаете cat и нажмите стрелку вверх, вы увидите на экране что-то вроде этого:

$ cat 
^[[A 

т.е., побег, открывающая скобка, A (она будет отличаться в зависимости от терминала).

Это означает, что если вы нажмете ESC ESC вверх, Emacs видит ESC ESC ESC [A и реагирует соответствующим образом (клавиатура бросить курить, а затем вставьте [A).

Итак, Emacs ведет себя согласно документам.

Если вы хотите отключить ключ привязки, вы можете сделать

(define-key esc-map (kbd "<ESC><ESC>") nil) 

Это не очень хорошее решение, ИМО, но не катастрофа, так как вы всегда можете использовать C-г вместо.