From 769cc973b65c8cd1ab6dcb900d5066e8abcb4aa1 Mon Sep 17 00:00:00 2001 From: yoichi Date: Tue, 21 Sep 2004 14:15:08 +0000 Subject: [PATCH] * wl-vars.el (wl-message-header-button-alist): Change default value. (wl-message-body-button-alist): Ditto. --- wl/ChangeLog | 6 ++++++ wl/wl-vars.el | 4 ++-- 2 files changed, 8 insertions(+), 2 deletions(-) diff --git a/wl/ChangeLog b/wl/ChangeLog index 4697b11..4e098b0 100644 --- a/wl/ChangeLog +++ b/wl/ChangeLog @@ -1,3 +1,9 @@ +2004-09-21 Yoichi NAKAYAMA + + * wl-vars.el (wl-message-header-button-alist): Change default + value. + (wl-message-body-button-alist): Ditto. + 2004-09-20 Yoichi NAKAYAMA * wl.el (wl-exit): Run elmo-passwd-alist-clear. diff --git a/wl/wl-vars.el b/wl/wl-vars.el index c9fd550..d5e3f8c 100644 --- a/wl/wl-vars.el +++ b/wl/wl-vars.el @@ -1709,7 +1709,7 @@ This variable overwhelm `wl-message-ignored-field-list' settings." (defcustom wl-message-header-button-alist (` (("^\\(References\\|Message-Id\\|In-Reply-To\\):" - "<[^>]+>" + "<[^>\n ]+>" 0 wl-message-button-refer-article 0) ("^[^:]+:" "\\(<\\(url: \\)?news:\\([^>\n ]*\\)>\\)" @@ -1727,7 +1727,7 @@ This variable overwhelm `wl-message-ignored-field-list' settings." (defcustom wl-message-body-button-alist '(("]+>" 0 'ignore 0 1024) - ("<[^>]+@[^>]+>" 0 wl-message-button-refer-article 0 1024)) + ("<[^>\n ]+@[^>\n ]+>" 0 wl-message-button-refer-article 0 1024)) "Alist of regexps to match buttons in message body." :type '(repeat (list regexp -- 1.7.10.4