Wanderlust は Emacs 上で動く IMAP4rev1 対応のメール/ニュース管理システムです。
関連するページはこちら、
Mail関係はこちら
MacOSX & Cygwin on Windows のソフトの事
CarbonEmacs と、NTEmacs のページは此方
Homepageから
職場や学校ではネットワークに接続されたワークステーション(デスクトップ)でメールを読み、おうちからはダイアルアップ等で職場や学校に接続してメールを読む、といった具合に、複数の環境をわたり歩いてメールを読む人は多いと思います。その場合、例えばメールを自宅の PC に取り込んでしまっては、次の日職場や学校に行ったときにそのメールを読むことができません。
この問題を解決するスマートな方法の一つとして、 IMAP プロトコルを使って職場や学校とおうちとの間でメールを保存しておくフォルダを共有することが考えられます。
Wanderlust は、この IMAP を使って効率的にメッセージ管理することを目指したEmacs 上のメール/ニュース管理システムです。
当然、pop も扱えます。私は、imap は、mac.com のメールだけで、それ以外の複数のアカウントは、pop ですが、wanderlust で、読み書きしています。
Homepage には、色々な特徴が書かれていますが、wanderlust に移行するときに、私にとって、大事だったのは、
導入時に嵌まったのは、
e-lisp で書かれている事も有って、柔軟性に富む為(そういう風に作ってある) 、ちょっとした事をするにも選択肢が豊富で、嵌まり易いです。
$ cvs -d :pserver:anonymous@cvs.m17n.org:/cvs/root login
$ cvs -d :pserver:anonymous@cvs.m17n.org:/cvs/root checkout wanderlust
又、snapshot が、此処に有ります。http://jpl.org/ftp/pub/m17n/wanderlust-snapshots/
cvs の方が幸せかもしれない。
imput で送信する場合、cygwin の shell が、挙動不審なので、shell を介さず直接叩けるように変更します。
wanderlust/util/im-wl.el の、148 行目
shell-file-name shell-command-switch (format "%s < %s" (mapconcat 'identity im-wl-dispatcher " ") msg)))
を、次の様にを書換えます。
shell-file-name shell-command-switch (format "%s --message=%s" (mapconcat 'identity im-wl-dispatcher " ") msg)))
又、wanderlust/util の中身をインストールするのに、wanderlust/WL-CFG を書換えます。
;; If you want to install utils, uncomment following line. ;(setq wl-install-utils t)
を、コメントを外します。
;; If you want to install utils, uncomment following line. (setq wl-install-utils t)
Mac OSX
$ make EMACS=/Applications/Emacs.app/Contents/MacOS/Emacs LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/22.0.93/site-lisp INFODIR=/Applications/Emacs.app/Contents/Resources/share/info PIXMAPDIR=/Applications/Emacs.app/Contents/Resources/share/etc/wl $ sudo make EMACS=/Applications/Emacs.app/Contents/MacOS/Emacs LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/22.0.93/site-lisp INFODIR=/Applications/Emacs.app/Contents/Resources/share/info PIXMAPDIR=/Applications/Emacs.app/Contents/Resources/share/etc/wl install $ make EMACS=/Applications/Emacs.app/Contents/MacOS/Emacs LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/22.0.93/site-lisp INFODIR=/Applications/Emacs.app/Contents/Resources/share/info info $ sudo make EMACS=/Applications/Emacs.app/Contents/MacOS/Emacs LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/Applications/Emacs.app/Contents/Resources/share/emacs/22.0.93/site-lisp INFODIR=/Applications/Emacs.app/Contents/Resources/share/info install-info
Cygwin
$ make EMACS=/usr/local/emacs/22.0.93/bin/Emacs LISPDIR=/usr/local/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/usr/local/emacs/22.0.93/site-lisp INFODIR=/usr/local/emacs/info PIXMAPDIR=/usr/local/emacs/etc/wl $ sudo make EMACS=/usr/local/emacs/22.0.93/bin/Emacs LISPDIR=/usr/local/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/usr/local/emacs/22.0.93/site-lisp INFODIR=/usr/local/emacs/info PIXMAPDIR=/usr/local/emacs/etc/wl install $ make EMACS=/usr/local/emacs/22.0.93/bin/Emacs LISPDIR=/usr/local/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/usr/local/emacs/22.0.93/site-lisp INFODIR=/usr/local/emacs/info info $ sudo make EMACS=/usr/local/emacs/22.0.93/bin/Emacs LISPDIR=/usr/local/emacs/site-lisp VERSION_SPECIFIC_LISPDIR=/usr/local/emacs/22.0.93/site-lisp INFODIR=/usr/local/emacs/info install install-info
先ずは、.emacs.el から、
;; wanderlust をロードする準備
;; (load "mime-setup")
;; まず、次の設定を ~/.emacs などに書いてください。
;; XEmacs の package としてインストールされている場合は必要ありません。
(autoload 'wl "wl" "Wanderlust" t)
(autoload 'wl-other-frame "wl" "Wanderlust on new frame." t)
(autoload 'wl-draft "wl-draft" "Write draft with Wanderlust." t)
;; アイコンを置くディレクトリ
;; XEmacs の package としてインストールされている場合は必要ありません。
(setq wl-icon-directory
(cond
((featurep 'mac-carbon) "/Applications/Emacs.app/Contents/Resources/share/etc/wl")
((featurep 'dos-w32) "d:/cygwin/usr/local/emacs/etc/wl")))
emacs で、デフォルトのメーラーを wanderlust にする場合、下記を追加します。
(autoload 'wl-user-agent-compose "wl-draft" nil t)
(if (boundp 'mail-user-agent)
(setq mail-user-agent 'wl-user-agent))
(if (fboundp 'define-mail-user-agent)
(define-mail-user-agent
'wl-user-agent
'wl-user-agent-compose
'wl-draft-send
'wl-draft-kill
'mail-send-hook))
wanderlust/samples/ja/ に有る、dot.wl、dot.address、dot.folders を、ホームディレクトリにコピーして、夫々、.wl、.address、.folders とリネームします。
中の説明を読みながら設定すれば、大抵は大丈夫な筈。
shimbun を読みたければ、.folders に、
= @ "新聞"
を、追加しましょう。
M-x wl