branch: master
commit 3712607b1ef2193e02d29164d500ea49b8f5daf2
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>

    * smtpmail-async.el: Exclude some vars when injecting (#22).
---
 smtpmail-async.el |    4 +++-
 1 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/smtpmail-async.el b/smtpmail-async.el
index b1a132c..f3f0b9e 100644
--- a/smtpmail-async.el
+++ b/smtpmail-async.el
@@ -52,7 +52,9 @@
         (with-temp-buffer
           (insert ,buf-content)
           ;; Pass in the variable environment for smtpmail
-          ,(async-inject-variables "\\`\\(smtpmail\\|\\(user-\\)?mail\\)-")
+          ,(async-inject-variables
+            "\\`\\(smtpmail\\|\\(user-\\)?mail\\)-"
+            nil 
"\\`\\(mail-header-format-function\\|smtpmail-address-buffer\\|mail-mode-abbrev-table\\)")
           (smtpmail-send-it)))
      `(lambda (&optional ignore)
         (message "Delivering message to %s...done" ,to)))))

Reply via email to