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

我已将emacs配置为通过gmail account 发送邮件,并且希望能够通过elisp程序向自己发送电子邮件。使用的命令是message-mail。

最佳答案

这是消息邮件的包装,它提示您输入“收件人”和“主题”行:

(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)))

10-07 19:42
查看更多