5.3 Emacs mew -- 强大的Emacs Email客户端

5.3.1 Emacs Mew的安装

Emacs mew的最新版本和源代码可以从 http://www.mew.org上下 载, 下载后解压, 使用make进行编译安装, 路径可以修改一下Makefile 中的prefix, elispdir和etcdir, 注意${prefix}/bin必须在PATH变量 中, 没有的话作个符号链接也可以, 对于NTEmacs的用户, 要把下载mew 安装包中的几个exe文件拷贝到emacs安装目录的bin下.

5.3.2 Emacs mew配置

把下面的代码加入~/.emacs中, 把用户名, 主机名换成对应的就可 以了

(autoload 'mew "mew" nil t)
(autoload 'mew-send "mew" nil t)
(if (boundp 'read-mail-command)
    (setq read-mail-command 'mew))
(autoload 'mew-user-agent-compose "mew" nil t)
(if (boundp 'mail-user-agent)
    (setq mail-user-agent 'mew-user-agent))
(if (fboundp 'define-mail-user-agent)
    (define-mail-user-agent
       'mew-user-agent
       'mew-user-agent-compose
       'mew-draft-send-message
       'mew-draft-kill
       'mew-send-hook))
(setq mew-pop-size 0)
(setq mew-smtp-auth-list nil)
(setq toolbar-mail-reader 'Mew)
(set-default 'mew-decode-quoted 't)  
(setq mew-prog-pgp "gpg")
(setq mew-name "显示的用户名")
(setq mew-user "用户名")
(setq mew-smtp-user "用户名")
(setq mew-mail-domain "主机的域名")
(setq mew-smtp-auth-list nil)
(setq mew-smtp-server "SMTP主机")
(setq mew-pop-server "POP主机")
(setq mew-pop-user "用户名")
(setq mew-pop-auth 'pass) ;;认证方式
(setq mew-use-cached-passwd t)
(setq mew-nntp-server "NNTP服务器")
(setq mew-icon-directory (expand-file-name "mew/etc" dtsite-dir))
(when (boundp 'utf-translate-cjk)
      (setq utf-translate-cjk t)
      (custom-set-variables
         '(utf-translate-cjk t)))
(if (fboundp 'utf-translate-cjk-mode)
    (utf-translate-cjk-mode 1)) 
(require 'flyspell) ;;非常好用的英文的拼写检查
     

5.3.3 常见问题

• 无法从网上下载所有邮件，总是报告类似"no new messages (3 messages left)"的消息

  删除Mail/.mew-uidl文件使Mew将邮件认为新邮件，设置(setq mew-pop-size 0) 使mew下载所有邮件，不论大小, 注意首先要使 用'Q'退出new ( 'Q' is 'shift' + 'q', not just 'q'), 保证 mew重新加载~/Mail/.mew-uidl

• 如何在mew将邮件地址加入地址簿?

  C-cC-a加入地址簿, C-uC-cC-a加入地址和用户信息, 在发送邮件时可以使用TAB补全, 使用M-TAB将地址转换为User<address>的样子

• 无法发送和接收邮件

  在mew的分发包中一般包含mewls, mewl, mewencode, mewdecode, incm等可执行文件, 检查它们所在路径是否包含在环境变量PATH中, 或者拷贝这些文件到emacs安装目录的bin目录下

• 设置多个邮件

  mew提供多邮件设置, 这是通过设置mew-config-alist变量完成的, 例如我的邮箱设置 (可以设置在~/.emacs或者~/.mew.el中)

  (setq mew-config-alist
        '(("yahoo"
       ("name"         .  "Jerry")
       ("user"         .  "myname")
       ("smtp-server"  .  "127.0.0.1")
       ("smtp-port"    .  "5059")
       ("pop-server"   .  "127.0.0.1")
       ("pop-port"     .  "5058")
       ("smtp-user"    .  "myname")
       ("pop-user"     .  "myname")
       ("mail-domain"  .  "nonexist.com")
       ("mailbox-type" .  pop)
       ("pop-auth"     .  pass)
       ("smtp-auth-list" . ("PLAIN" "LOGIN" "CRAM-MD5"))
       )
      ("default"
       ("name"         .  "Jerry")
       ("user"         .  "sample")
       ("smtp-server"  .  "127.0.0.1")
       ("smtp-port"    .  "25")
       ("pop-server"   .  "127.0.0.1")
       ("pop-port"     .  "110")
       ("smtp-user"    .  "sample")
       ("pop-user"     .  "sample")
       ("mail-domain"  .  "sample.net")
       ("mailbox-type" .  pop)
       ("pop-auth"     .  pass)
       ("smtp-auth-list" . ("PLAIN" "LOGIN" "CRAM-MD5"))
       )))
       
  

  设置好后, 可以通过在summary列表下输入`C'切换设置, 不过需要注意 "mailbox-type"和"pop-auth"设置的值是没有引号的

5.3.4 一些mew的屏幕截图

mew屏幕截图1

mew屏幕截图2