- 56 名前：54 mailto:sage [2007/11/02(金) 13:19:22 ID:RBJ62gmy0]
- *pre-command-hook*は使えるかもしれません。
と言えるかどうか試すまでに書いたコードを以下に。
aを長押しするとabababとかなります。
minor-mode-mapはmajor/localよりも優先されてキーをさらっていくはずなので、
他と被ると問題はあるのですが一応できそうなので。
(defvar *test-map* (make-keymap))
(define-key *test-map* #\a (lambda () (interactive) (insert "b")))
(defvar *test-p* t)
(defun test-hook ()
(if *test-p*
(unset-minor-mode-map *test-map*)
(set-minor-mode-map *test-map*))
(setq *test-p* (not *test-p*)))
(add-hook '*pre-command-hook* 'test-hook)
tipsネタになりそうなので、
書けたらどんなコード書いたか見せてくださると嬉しいです。
|
 |
