2004-12-12 Scott Renfro <scott@renfro.org>

	* wl-summary.el (wl-summary-default-subject-filter): Fixed greedy
	regex for square-branket.

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 1d2c061..23bb02c 100644 (file)
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,9 +1,14 @@
+2004-12-12  Scott Renfro <scott@renfro.org>
+
+       * wl-summary.el (wl-summary-default-subject-filter): Fixed greedy
+       regex for square-branket.
+
 2004-12-11  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
        * wl-mime.el (wl-mime-preview-follow-no-mime): Call
        `wl-message-mime-analysis-p' with argument `header'.
 
-2004-12-12  Yuuichi Teranishi  <teranisi@gohome.org>
+2004-12-11  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * wl-mime.el (wl-draft-yank-current-message-entity): 
        Switch to no-mime following method according to wl-message-display-type

diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 1eaf098..a57ec6d 100644 (file)
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -2575,7 +2575,7 @@ If ARG, without confirm."
 (defun wl-summary-default-subject-filter (subject)
   (setq subject (elmo-replace-in-string subject "[ \t]*\\(re\\|was\\)[:>]" ""))
   (setq subject (elmo-replace-in-string subject "[ \t]" ""))
-  (elmo-replace-in-string subject "^\\[.*\\]" ""))
+  (elmo-replace-in-string subject "^\\[[^]]*\\]" ""))
 
 (defun wl-summary-subject-equal (subject1 subject2)
   (string= (funcall wl-summary-subject-filter-function subject1)