(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
M-x wl-summary-pack-number
M-x elmo-passwd-alist-save
(setq wl-summary-exit-next-move nil)
(setq wl-plugged nil)
(setq wl-thread-indent-level 2) (setq wl-thread-have-younger-brother-str "+" wl-thread-youngest-child-str "+" wl-thread-vertical-str "|" wl-thread-horizontal-str "-" wl-thread-space-str " ")
(setq wl-summary-indent-length-limit nil) (setq wl-summary-width nil)
(setq wl-subject-length-limit nil)
(setq wl-interactive-exit nil)
(setq wl-interactive-send t)
(setq mime-edit-split-message nil)
(setq wl-thread-insert-opened t)
E