(setq wl-message-ignored-field-list
'(".*"))
(setq wl-message-visible-field-list
'("^To"
"^From"
"^Subject"
"^Date"
"^Cc"
))
(setq wl-stay-folder-window t)
(setq wl-summary-line-format "%n%T%P%1@%Y/%M/%D(%W)%h:%m %t%[%17(%c %f%) %] %#%~%s")
(setq wl-summary-line-format-spec-alist
(append wl-summary-line-format-spec-alist
'((?@ (wl-summary-line-attached)))))
(setq wl-draft-reply-without-argument-list
'(("Followup-To" . (nil nil ("Followup-To")))
("Newsgroups" . (nil nil ("Newsgroups")))
("Mail-Followup-To" . (("Mail-Followup-To") nil ("Newsgroups")))
("Reply-To" . (("Reply-To") ("To" "Cc") nil))
("From" . (("From") ("To" "Cc") ("Newsgroups")))
))
(custom-set-faces
'(wl-highlight-folder-path-face ((t (:underline t))))
'(wl-highlight-summary-displaying-face ((t (:background "light goldenrod"))))
)
(setq wl-summary-auto-refile-skip-marks nil)
(setq mime-save-directory "c:/temp/a")
M-x customize-group RET wl RET