[mew-dist 29170] Subjectの単純化(MLの場合)
Murata Takashi
tmurata at example.com
2010年 3月 24日 (水) 13:55:56 JST
村田です。
mew-subject-simplify-replace-alist の変換結果に \\1 や \\& が使えるよう
に、replace-match の LITERAL を nil にした方が使い勝手がいいかと思うの
ですが、どうでしょうか?
*** mew-summary3.el~ Wed Jan 21 14:54:59 2009
--- mew-summary3.el Wed Mar 24 12:11:29 2010
***************
*** 126,132 ****
(setq regexp (mew-alist-get-key action))
(setq replace (if no-replace nil (mew-alist-get-value action)))
(if (string-match regexp ret)
! (setq ret (replace-match (if replace (eval replace) "") nil t ret))))
ret))
(defun mew-subject-simplify-ml (str)
--- 126,132 ----
(setq regexp (mew-alist-get-key action))
(setq replace (if no-replace nil (mew-alist-get-value action)))
(if (string-match regexp ret)
! (setq ret (replace-match (if replace (eval replace) "") nil nil ret))))
ret))
(defun mew-subject-simplify-ml (str)
Outlook が Subject を丸ごと MIME encoding するため、ML でやり取りしてい
ると、Subject が以下のように延々と長くなることがあります。
Suject: Re: [hoge] RE: [hoge] RE: [hoge] ....
これを短くするため、mew-subject-simplify-replace-alist に、自分は以下の
ような変換を追加したいと思います。これは通番付きには対応していませんが。
'("^Re: \\(\\[[-_a-z0-9]+\\]\\)\\( Re: \\1\\)+" . "Re: \\1")
よろしくお願いします。
--
村田 隆 / tmurata at example.com <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Mew-dist メーリングリストの案内