Wanderlust その5
■ このスレッドは過去ログ倉庫に格納されています
0330hmurata
2005/12/14(水) 20:33:43Becky って良く知らないけど, To に自分のアドレスがなかったら印を付ければ
良いのかな? であれば, こんな感じでどうでしょう.
(動かしての確認はしていません)
(defun wl-summary-line-indirect ()
(if (catch 'found
(dolist (to (elmo-message-entity-field wl-message-entity 'to))
(when (wl-address-user-mail-address-p to)
(throw 'found t))))
""
"i"))
(setq wl-summary-line-format-spec-alist
(cons '(?i (wl-summary-line-indirect))
wl-summary-line-format-spec-alist))
■ このスレッドは過去ログ倉庫に格納されています