Mewで返信する際のフォーマットを指定

Mewで返信を書くとき，デフォルトだと

From: hoge
Subject: xxxx
Date: Mon, 23 Dec 2012 00:00:00 +900 (JST)

というものが挿入される．
ここのフォーマットを調整したい場合，mew-cite-fieldsとmew-cite-formatという2つの変数の値を設定するのが早い．
MewのメッセージからDate: とFrom: のフィールドを抜き出してこの順で挿入したい場合，例えば

(setq mew-cite-fields '("Date:" "From:"))
(setq mew-cite-format "\nOn %s\n%s wrote:\n")

とすれば

On Mon, 23 Dec 2012 12:34:56 +900 (JST)
hoge wrote:

となる．ただ，曜日の情報や"12:34:56 +900 (JST)"が要らないという人もあるだろう．
そういう場合は，

(setq mew-cite-strings-function
      (lambda ()
        (let* ((date (mew-cite-get-value mew-date:))
               (from (mew-cite-get-value mew-from:))
               (cite-date (cond
                           ((and date (string-match mew-time-rfc-regex date))
                            (format "%s %s %s"
                                    (match-string 1 date)
                                    (match-string 2 date)
                                    (match-string 3 date)))
                           (t "Unknown")))
               (cite-from (or from "Unknown")))
          (format "\nOn %s, %s wrote:\n" cite-date cite-from))))

というコードを書いておけば，

On 23 Dec 2012, hoge wrote:

みたいに挿入される．上記コードは2chのUNIX板から拝借している．
また，時刻を入れたいなら，上記を少々修正して

(setq mew-cite-strings-function
      (lambda ()
        (let* ((date (mew-cite-get-value mew-date:))
               (from (mew-cite-get-value mew-from:))
               (cite-date (cond
                           ((and date (string-match mew-time-rfc-regex date))
                            (format "%sth %s %s %s:%s"
                                    (match-string 1 date)
                                    (match-string 2 date)
                                    (match-string 3 date)
                                    (match-string 4 date)
                                    (match-string 5 date)))
                           (t "Unknown")))
               (cite-from (or from "Unknown")))
          (format "\nOn %s, %s wrote:\n" cite-date cite-from))))

というコードを書いておけば，

On 23th Dec 2012 12:34, hoge wrote:

となる．
これらを元にいろいろ改造すれば好みのフォーマットが実現できるであろう．