;(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 "|"
(and sequence
(cadr (split-string sequence " ")))))
(if (string-match
-;;; "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
"^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
subject-string)
(progn
;(setq wl-summary-divide-thread-when-subject-changed t)
;; \e$B%9%l%C%I$N8+$?L\$rJQ$($k\e(B
+;(setq wl-thread-indent-level 2)
;(setq wl-thread-have-younger-brother-str "+"
; wl-thread-youngest-child-str "+"
; wl-thread-vertical-str "|"
(and sequence
(cadr (split-string sequence " ")))))
(if (string-match
-;;; "^\\s(\\(.+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
"^\\s(\\(\\S)+\\)[ :]\\([0-9]+\\)\\s)[ \t]*"
subject-string)
(progn
;; \e$BI=<($9$k%X%C%@$N@_Dj\e(B
;; 'wl-message-ignored-field-list' \e$B$h$jM%@h$5$l$k\e(B
-(setq mime-view-visible-field-list '("^Message-Id:"))
+(setq wl-view-visible-field-list '("^Message-Id:"))
;; X-Face \e$B$rI=<($9$k\e(B (\e$BMW\e(B 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)
;; \e$B$^$;$s!#\e(Bnil \e$B$G$9$Y$F$N%a%C%;!<%8$,BP>]$K$J$j$^$9!#\e(B
;(setq wl-summary-auto-refile-skip-marks nil)
-
;;; dot.wl ends here