emacs上でmozcを使ったときにC-nとC-pで変換候補中の移動をできるようにする

emacs上での日本語入力にmozcを使うようにしてみた。macではなくlinux上での環境の話。

通常の設定では以下だけなのだけれど(mozcをビルド後に mozc_emacs_helper が使えるようにしないとだめ)。

(require 'mozc)
(set-language-environment 'japanese)
(setq default-input-method 'japanese-mozc)

このままの場合には、変換候補中のカーソル移動は矢印キーに限定される。 個人的には、C-p, C-nはemacsのバッファ上の通常のカーソル移動ではなく、変換候補のリスト上の移動になってほしかった。

advice

なので以下のようなadviceを追加した。

(defun advice:mozc-key-event-with-ctrl-key--with-ctrl (r)
  (cond ((and (not (null (cdr r))) (eq (cadr r) 'control) (null (cddr r)))
         (case (car r)
           (102 r) ; C-f
           (98 r) ; C-b
           (110 '(down)) ; C-n
           (112 '(up))  ; C-p
           (t r)
           ))
        (t r)))

(advice-add 'mozc-key-event-to-key-and-modifiers :filter-return 'advice:mozc-key-event-with-ctrl-key--with-ctrl)
;; (advice-remove 'mozc-key-event-to-key-and-modifiers 'mozc-key-event-with-ctrl-key)

最近は、advice.elではなくnadvice.elの方を使うっぽい。