Mew の g=>C-s のフォルダ名検索に migemo を使う

iPhone4 を買ったので、メール環境を mbox から Gmail の IMAP に移行し
ました。

いつでもどこでもメールを見られるのは便利ですねえ。これでネットから
隔離された実家に帰っても大丈夫そうです。

頻度が減ったとはいえ、Mew からも Gmail を読むことがあります。ただ、
Gmail ではデフォルトのメールフォルダ名が日本語です。

%[Gmail]/
%[Gmail]/すべてのメール
%[Gmail]/ゴミ箱
%[Gmail]/スター付き
%[Gmail]/下書き
%[Gmail]/迷惑メール
%[Gmail]/送信済みメール

g' => C-s’ での移動が面倒です。正直やってられません。
`g’ => [TAB] なんてもってのほかです。

以下の設定をして、g' => C-s’ から migemo を使えるようにしました。

(defadvice mew-input-folder-search-forward-1
  (around
   mew-input-folder-search-forward-1-with-migemo
   activate)
  "migemo を使ってフォルダ名を検索する。"
  (let ((migemo-do-isearch t))
    ad-do-it))