From a1e85c915932e0e7e1848d576f711ead08a16261 Mon Sep 17 00:00:00 2001 From: okada Date: Mon, 26 Feb 2001 01:27:25 +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 28a42de..fe98f9d 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-20 Katsumi Yamaoka * wl-demo.el (wl-demo-image-type-alist): Use ' instead of `. diff --git a/wl/wl-summary.el b/wl/wl-summary.el index 5cbc561..26fa55e 100644 --- a/wl/wl-summary.el +++ b/wl/wl-summary.el @@ -2896,7 +2896,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