imap のフォルダを全部階層化する

最近 wl がマイブーム。


実は imap のフォルダを全部階層化するのはすごい簡単だって事に気付いた。以下のように .wl に書くだけ。

(setq wl-folder-hierarchy-access-folders '("^%.*$"))

info を読む限りだと、作りたい階層の分だけ wl-folder-hierarchy-access-folders に定義しないように見えるんだけど、実はそんな事はなかったというお話し。

で、なんでこれだけでいいかというと、wl-folder-update-newest で elmo-folder-list-subfolders の引数 one-level に (wl-string-match-member (car entity) wl-folder-hierarchy-access-folders) を渡してるから。

つまり、wl-folder-hierarchy-access-folders の定義に一致するフォルダ名だった場合はその下の一階層だけ取ってきて、それらに対してまた elmo-folder-list-subfolders をしてる。

必要な分だけ書くより当然遅くなるけど、imap に自分で作ってるフォルダ程度だったらあんま気にならない速度でとってこれる。