From: murata <murata>
Date: Wed, 10 May 2000 12:57:50 +0000 (+0000)
Subject: (wl-summary-search-parent-by-subject-regexp): Changed.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=67f5ddc0798d389bad8c8284eaf1293d4eb41090;p=elisp%2Fwanderlust.git

(wl-summary-search-parent-by-subject-regexp): Changed.
(wl-subject-length-limit): New variable.
(wl-highlight-thread-indent-string-regexp): Changed for linked thread.
---

diff --git a/wl/wl-vars.el b/wl/wl-vars.el
index ab4ec06..534a1aa 100644
--- a/wl/wl-vars.el
+++ b/wl/wl-vars.el
@@ -175,7 +175,7 @@ If you don't have multiple e-mail addresses, you don't have to set this."
   :type 'function
   :group 'wl-summary)
 
-(defcustom wl-summary-search-parent-by-subject-regexp "^[ \t]*\\(\\[[^:]+[,: ][0-9]+\\]\\)?[ \t]*re"
+(defcustom wl-summary-search-parent-by-subject-regexp "^[ \t]*\\(\\[[^:]+[,: ][0-9]+\\]\\)?[ \t]*re[\\^[: ]"
   "*If message does not have in-reply-to field nor references field and
  subject matches this regexp, search parent message by subject matching."
   :type 'string
@@ -1103,6 +1103,12 @@ with wl-highlight-folder-many-face."
   :group 'wl-summary
   :group 'wl-pref)
 
+(defcustom wl-subject-length-limit 35
+  "*Subject width in summary."
+  :type 'integer
+  :group 'wl-summary
+  :group 'wl-pref)
+
 (defcustom wl-mime-charset (if wl-on-nemacs
 			       'iso-2022-jp
 			     'x-ctext)
@@ -1893,7 +1899,7 @@ This variable can also be a regex. "
 (defvar wl-thread-space-str                "　"
   "*A string for thread branch line. It should contain one character.")
 
-(defvar wl-highlight-thread-indent-string-regexp "[^\\[]*"
+(defvar wl-highlight-thread-indent-string-regexp "[^[<]*"
   "* A regexp string for thread indent...for highlight.")
 
 ;; folder icons. filename relative to wl-icon-dir