From 475cd78300286931408cba01221bc58c83b7fb5b Mon Sep 17 00:00:00 2001 From: okada Date: Mon, 26 Feb 2001 01:28:09 +0000 Subject: [PATCH] * wl-summary.el (wl-summary-default-subject-filter): Fix for `Re>'. --- wl/ChangeLog | 4 ++++ wl/wl-summary.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 28c98ec..030e9ed 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,7 @@ +2000-02-26 Kenichi OKADA + + * wl-summary.el (wl-summary-default-subject-filter): Fix for `Re>'. + 2001-02-24 Yuuichi Teranishi * wl-util.el (wl-regexp-opt): New function. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 6eb0dc8..0bece63 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -2742,7 +2742,7 @@ If ARG, without confirm." (defun wl-summary-default-subject-filter (subject) (let ((case-fold-search t)) - (setq subject (elmo-replace-in-string subject "[ \t]*\\(re\\|was\\):" "")) + (setq subject (elmo-replace-in-string subject "[ \t]*\\(re\\|was\\)[:>]" "")) (setq subject (elmo-replace-in-string subject "[ \t]" "")) (elmo-replace-in-string subject "^\\[.*\\]" ""))) -- 1.7.10.4