Como substituir a ligação de teclas ctl-tab no modo secundário textmate.el

Question

Estou brincando com textmate.el:https://github.com/defunkt/textmate.el. Um pouco confuso no começo se você nunca experimentou o textmate, mas muito legal!

Gostaria de substituir uma ligação no modo secundário.

Aqui está um trecho da fonte que faz a ligação:

(defvar *textmate-mode-map*
  (let ((map (make-sparse-keymap)))
    (cond ((featurep 'aquamacs)
       ....
(t ;; Any other version
 (define-key map [(control tab)] 'textmate-shift-right)
 (define-key map [(control shift tab)] 'textmate-shift-left)

Em vez de modificar a fonte que obtive no github, gostaria de substituí-la em meu .emacs.

Answer 1

Tudo o que deveria ser necessário é

(eval-after-load 'textmate
  '(progn
     (define-key *textmate-mode-map* [(control tab)] 'my-cool-function)))

substituindo, é claro, my-cool-functionpor tudo o que você realmente deseja que ele faça. Se você quiser usar uma função lambda, não se esqueça de torná-la interativa ou você receberá um erro:

(eval-after-load 'textmate
  '(progn
     (define-key *textmate-mode-map* [(control tab)]
       (lambda () (interactive)
         ...))))