From 3712607b1ef2193e02d29164d500ea49b8f5daf2 Mon Sep 17 00:00:00 2001
From: Thierry Volpiatto <thierry.volpiatto@gmail.com>
Date: Fri, 7 Mar 2014 07:34:42 +0100
Subject: [PATCH] * smtpmail-async.el: Exclude some vars when injecting (#22).

---
 smtpmail-async.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/smtpmail-async.el b/smtpmail-async.el
index b1a132c37..f3f0b9e95 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)))))
-- 
2.39.2