[mew-dist 29170] Subjectの単純化(MLの場合 )
Murata Takashi <[email protected]>
| Newsgroups | gmane.mail.mew.general.japanese |
|---|---|
| Message-ID | <[email protected]> |
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")
--
/ [email protected] <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<