~/.wl
(setq wl-user-mail-address-list (list "johndoe@foo.example.com" "john-doe@gmail.example.com")) ;; メッセージ送信時ではなく編集開始前に wl-draft-config 適用 (add-hook 'wl-mail-setup-hook 'wl-draft-config-exec) (remove-hook 'wl-draft-send-hook 'wl-draft-config-exec) ;; 好みで (setq wl-message-ignored-field-list '("^X-Google" "^X-Gm" "^ARC" "^DKIM" "^Received" "^X-Received" "^X-No-Auto-Attachment" "^Return-Path" "^Authentication-Results" "^X-SG" "^X-Feedback" "^In-Reply-To" "^References" "^Message-Id" "^X-Virus-Status" "^X-Forwarded-Message-Id" "^X-MS" "^Thread-Index" "^x-forefront" "^x-microsoft" "^X-Qmail" "^Message-ID" "^X-odins" "^X-Brightmail" "^X-cloud-security" "^X-KLMS-")) ;; 警告を黙らせる為のダミー: 以下の垢毎テンプレートで上書きされます (setq wl-from "johndoe@foo.example.com") ;; 垢抽出、適用 (setq wl-draft-config-alist '(((string-match "johndoe@foo\\.example\\.com" wl-draft-parent-folder) (template . "foo")) ((string-match "john-doe@gmail\\.example\\.com" wl-draft-parent-folder) (template . "bar")))) ;; 垢別送信サーバー設定: 上の "foo", "bar" と対応 (setq wl-template-alist '(("foo" ;; plaintext dumb server example (wl-from . "johndoe@foo.example.com") ("From" . wl-from) ("Fcc" . "%Sent:johndoe/clear@imap.foo.example.com:143!") ;; need to manually copy message to sent folder (bottom . " -- John Doe") ;; signature (wl-smtp-posting-server . "smtp.foo.example.com")) ("bar" ;; GMail (remove example) (wl-from . "john-doe@gmail.example.com") ("From" . wl-from) (wl-smtp-posting-server . "smtp.gmail.example.com") (wl-smtp-posting-port . 465) (wl-smtp-posting-user . "john-doe@gmail.example.com") (wl-smtp-authenticate-type . "plain") (wl-smtp-authenticate-type . ssl)) (setq wl-draft-reply-use-address-with-full-name nil) (setq wl-draft-always-delete-myself t) (setq wl-draft-reply-without-argument-list '(("From" . (("From") ("Cc") nil)))) ;; 重要: これをしないと添付ファイルなどを送信する時メッセージが大量に分割されて送信されてしまう! (setq mime-edit-split-message nil) (setq mime-view-type-subtype-score-alist '(((text . plain) . 4) ((text . enriched) . 3) ((text . html) . 2) ((text . richtext) . 1))) (setq elmo-message-fetch-confirm nil) (setq wl-fcc-force-as-read t) ;; UA に ASCII 以外の文字を使わない (setq wl-generate-mailer-string-function 'wl-generate-user-agent-string-1)
~/.folders
foo { %Inbox:johndoe/clear@imap.foo.example.com:143 %Sent:johndoe/clear@imap.foo.example.com:143 } bar { %Inbox:"john-doe@gmail.example.com"/clear@imap.gmail.example.com:993! %"[Gmail]/Sent Mail":"john-doe@gmail.example.com"/clear@imap.gmail.example.com:993! }
M-x wl
直後には、~/.folders
で指定した一覧が表示されるフォルダモードになっています。
SPC
/RET
S
c
q
フォルダを開くと、メールが一覧表示されているサマリモードになります。
s
SPC
BS
c
w
A
f
T
l
q