From: kaoru <kaoru>
Date: Tue, 11 Sep 2001 20:40:24 +0000 (+0000)
Subject: Typo Fix.
X-Git-Tag: wl-2_7_4~26
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fwanderlust.git;a=commitdiff_plain;h=37fb0d63e25bde463443c28836eaddd3e8bf0453

Typo Fix.
Remove comment-out statement in function.
---

diff --git a/samples/en/dot.wl b/samples/en/dot.wl
index 9458b5a..bb5d6c2 100644
--- a/samples/en/dot.wl
+++ b/samples/en/dot.wl
@@ -108,6 +108,7 @@
 ;(setq wl-summary-divide-thread-when-subject-changed t)
 
 ;; Thread view
+;(setq wl-thread-indent-level 2)
 ;(setq wl-thread-have-younger-brother-str "+"
 ;      wl-thread-youngest-child-str	 "+"
 ;      wl-thread-vertical-str		 "|"
@@ -192,7 +193,6 @@
 		       (and sequence
 			    (cadr (split-string sequence " ")))))
     (if (string-match
-;;;	 "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
 	 "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
 	 subject-string)
 	(progn
diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl
index 71c5611..6fd0a9c 100644
--- a/samples/ja/dot.wl
+++ b/samples/ja/dot.wl
@@ -107,6 +107,7 @@
 ;(setq wl-summary-divide-thread-when-subject-changed t)
 
 ;; スレッドの見た目を変える
+;(setq wl-thread-indent-level 2)
 ;(setq wl-thread-have-younger-brother-str "+"
 ;      wl-thread-youngest-child-str	 "+"
 ;      wl-thread-vertical-str		 "|"
@@ -193,7 +194,6 @@
 		       (and sequence
 			    (cadr (split-string sequence " ")))))
     (if (string-match
-;;;	 "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
 	 "^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
 	 subject-string)
 	(progn
@@ -308,13 +308,13 @@
 
 ;; 表示するヘッダの設定
 ;; 'wl-message-ignored-field-list' より優先される
-(setq mime-view-visible-field-list '("^Message-Id:"))
+(setq wl-view-visible-field-list '("^Message-Id:"))
 
 
 ;; X-Face を表示する (要 x-face (and x-face-mule))
 (when (and window-system
 	   (module-installed-p 'x-face))
-  (cond ((featurep 'xemacs)
+  (cond ((featurep 'xemacs)		; for XEmacs
 	 (autoload 'x-face-xmas-wl-display-x-face "x-face" nil t)
 	 (setq wl-highlight-x-face-function 'x-face-xmas-wl-display-x-face))
 	;; for Mule (GNU Emacs)
@@ -351,5 +351,4 @@
 ;; ません。nil ですべてのメッセージが対象になります。
 ;(setq wl-summary-auto-refile-skip-marks nil)
 
-
 ;;; dot.wl ends here