在Emacs程序中发送电子邮件

Question

有没有一种方法可以在elisp代码中从区域或缓冲区构建电子邮件消息，设置收件人，然后发送消息？

我已经配置了emacs通过我的gmail帐户发送邮件，我想能够从elisp程序向自己发送电子邮件。使用的命令是message-mail。

- justinhj

Answer 1

这是一个用于提示您输入“收件人”和“主题”行的消息邮件包装器：

(defun my-message-mail-region (b e to subject)
  "Send the current region in an email"
  (interactive "r\nsRecipient: \nsSubject: ")
  (let ((orig-buffer (current-buffer)))
    (message-mail to subject)
    (message-goto-body)
    (insert (save-excursion (set-buffer orig-buffer)
                            (buffer-substring-no-properties b e)))
    (message-send-and-exit)))

- Trey Jackson

---

值得一提的是，这将要求您选择发送方法，然后自动设置（自定义）变量“message-send-mail-function”为您的选择。 - yPhil

我收到了一个错误信息，上面写着：`在mail-region:init.el:48:3:警告：使用'with-current-buffer'而不是save-excursion+set-buffer` - incandescentman