使用 Emacs 发送电子邮件

Posted 2021-05-02 Emacs

Emacs自带了SMTP库,这使的Emacs无需任何第三方软件的帮助就能通过第三方邮件服务商发送电子邮件.

配置

在写邮件之前,推荐先配置一下 user-full-name 与 user-mail-address 这两个变量.
在编写新邮件时,Emacs会使用这两个变量来形成邮件中的 From header域的值.

(setq user-full-name "lujun9972")
(setq user-mail-address "[e-mail]")

此外,Emacs提供了多种方式用来发送电子邮件. 具体使用那种发送方式由变量 send-mail-function 决定,它可以有以下几个值:

• sendmail-query-once: 第一次发送邮件时咨询你要选择哪种发送方式,之后就用这种方式发送后面的邮件.

• smtpmail-send-it: 使用外部邮件服务商提供的SMTP邮件服务器来发送邮件. smtp的信息可以存入变量 smtpmail-smtp-server , smtpmail-smtp-user , smtpmail-smtp-service , smtpmail-stream-type 和文件 ~/.authinfo 中. 详情可以查看 Emacs SMTP Library 的说明

• sendmail-send-it: 使用外部默认的邮件发送程序来发送,一般来说改程序为 sendmail

• mailclient-send-it: 使用外部的邮件客户端来发送邮件

• feedmail-send-it: 类似 sendmail-send-it,但允许你延迟一段时间稍候发送. 详情参见文件 feedmail.el 中的注释.

可以看到其中后面3中发送方式都依赖于第三方的程序,唯一不依赖第三方程序的只有 smtpmail-send-it,所以我们可以直接这么设置:

(setq send-mail-function 'smtpmail-send-it)

如果我们明确总是使用某一个smtp服务器来发送电子邮件的话,我们还可以预先配置好  smtpmail-smtp-server , smtpmail-smtp-user , smtpmail-smtp-service , smtpmail-stream-type 这几个变量,省得到时候发送时手输.

(setq smtpmail-smtp-server "smtp.sina.com")
(setq smtpmail-smtp-user "lujun9972")
(setq smtpmail-smtp-service 25)
(setq smtpmail-stream-type 'starttls)

编写新邮件

按下 C-x m 或者直接执行 M-x compose-mail 就会弹出一个 *unsent mail* 的buffer,看起来大概是这样的:

To: 
Subject: 
From: lujun9972 <[e-mail]>
--text follows this line--

在buffer的最上方是一系列的header域,用于指明电子邮件的接受人,标题等信息.

而像 Date , Message-Id 这样的header,一般不会显示出来,这些header的值是在发送邮件时由emacs自动填写的.

理论上,你可以随意创建header域,但某些header域有其约定俗成的意义:

• Subject: 邮件的标题

• CC: 抄送人

• FCC: 该域指定的是一个文件路径. Emacs会将邮件内容以mbox的格式(或babyl格式)添加到该文件中. 若需要指定多个文件,则需要有多个FCC域,每个域一个文件

--text follows this lines-- 这一行用于分割mail的header和body. 在其上的是header,在其下的是邮件内容.

填写完header域以及邮件内容之后,按下 C-c C-c 后再输入密码就能将电子邮件发送出去了.

若你不希望每次都手工输入密码,则可以将密码保存到 ~/.authinfo 文件中,一个.authinfo文件的格式大概是这样的:

machine smtp服务器地址 login 用户名 port 端口号 password 密码

添加附件

按下 C-c C-a (mml-attach-file)  就能为邮件添加附件. Emacs会依次提示输入附件路径,类型,描述以及整合方式.

不过插入附件并不会真的把附件的内容添加到邮件内容中,相反它只会在邮件内容中插入一个 <#part> 的引用,像这样:

To: [e-mail]
Subject: 使用Emacs发送电子邮件实验
From: lujun9972 <[e-mail]>
--text follows this line--
这是内容

<#part type="text/x-org" filename="/home/lujun9972/github/lujun9972.github.com/Emacs之怒/使用Emacs发送电子邮件.org" disposition=attachment description=使用Emacs发送电子邮件.org>
<#/part>

设置mail address的别名

别名的定义保存在一个文件中,该文件由变量 mail-personal-alias-file 指定,默认为 ~/.mailrc. 文件的格式如下:

alias 别名 邮件地址
或
alias 别名 邮件地址1 邮件地址2 ...
或
source FILENAME

alias jsmith "John Q. Smith <[e-mail]>"

而 source 命令则可以引用其他的别名文件.

添加签名

变量 message-signature 的值决定了Emacs如何处理你的邮件签名, 它支持以下几种值:

• t: 会从 message-signature-file 指定的文件中读取并插入邮件签名,默认该文件为 ~/.signature

• 字符串: 该字符串就是邮件签名,直接插入

• nil: Emacs不会帮你自动插入邮件签名,需要手工执行 C-c C-w (message-insert-signature) 才能插入

按惯例,签名一般是以 -- 开头的,因此若你设置的签名没有该前缀的话, Emacs会自动昂你添加该前缀.

使用函数 (fortune-file &optional FILE) 可以使用fortune程序为你声称一个签名, 你可以为每个邮件插入不同的fortune cookie message:

(add-hook 'mail-setup-hook 'fortune-to-signature)

Queued delivery

若你的电脑不是一直连接到互联网上的,则你可以先写好邮件,将这些邮件暂存到一个队列中,然后等到连接到互联网上之后再一次性发送出去.

方法是设置变量 smtpmail-queue-mail 的值为非nil. 这种情况下,待发送的邮件并不会真正发送出去,而是先暂存到 smtpmail-queue-dir 中,然后等待人工调用 M-x smtpmail-send-queue-mail 命令时才真正发送出去.

调试

在发送邮件的过程中如果出现问题想调试,可以开启smtpmail的调试功能:

(setq smtpmail-debug-info t)
(setq smtpmail-debug-verb t)

之后与SMTP协议交互的每一个过程都会被记录在一个名为 *trace of SMTP session to xxxxxx* 的buffer中.

---

本期编辑： geekplux

欢迎投稿

投稿方式

向emacsist项目提交 Pull Request (投稿的文章请放在 tougao/这个目录下);

投稿时请：

• 注明你的昵称，或 ID，总之是你想显示的作者名;

• 如投稿的文章已经再其他地方发表，可以附上原文链接