☰

如何在 textmate.el 次要模式下覆盖 ctl-tab 键绑定

tag-icon • tag-icon emacs elisp
如何在 textmate.el 次要模式下覆盖 ctl-tab 键绑定

我正在玩 textmate.el：https://github.com/defunkt/textmate.el。如果您从未尝试过 textmate，一开始可能会有点困惑，但它真的很酷！

我想覆盖次要模式下的绑定。

以下是执行绑定的源代码片段：

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

我并不想修改从 github 获取的源代码，而是想在我的 .emacs 中覆盖它。

答案1

只需

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

当然，将其替换my-cool-function成您实际想要它执行的任何操作。如果您想使用 lambda 函数，请不要忘记使其具有交互性，否则您将收到错误：

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

相关内容