[xyzzy:05190] KaMail の Reply-To

[NISHITANI Masaki <m-nishitani@xxxxxxxxx>]

西谷と申します。

服部さんに質問（お願い？）ですが、
KaMail で、 Reply-To はつけられないのでしょうか？使えるとう
れしいです。
フォルダごとに違う Reply−To をつけたくて、とりあえず、下記
のように改造をでっちあげて使っていますが。

＃でも、X-Face とかを考えると、テンプレートにヘッダも含むほ
　うがいいですかね。

--
10a11
> (defvar *kamail-reply-to* nil)
587a589
>
601a604,615
>
>   (when *kamail-reply-to*
>     (cond ((stringp *kamail-reply-to*)
>          (insert (format nil "Reply-To: ~A~%" *kamail-reply-to*)))
>         ((listp *kamail-reply-to*)
>          (dolist (reply *kamail-reply-to*)
>            (let ((folder (cadr reply)))
>              (when (string-match folder *kamail-folder-current*)
>                (insert (format nil "Reply-To: ~A~%" (car reply)))
>              ))))))
>
>