From e269e488d0371834e95cd50cf622ae3ae2f214cb Mon Sep 17 00:00:00 2001
From: Óscar Nájera <hi@oscarnajera.com>
Date: Mon, 13 Sep 2021 11:03:27 +0200
Subject: fix email set-smtp-server

---
 config/doom/config.org | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

(limited to 'config')

diff --git a/config/doom/config.org b/config/doom/config.org
index ee6dca8..c3ca10a 100644
--- a/config/doom/config.org
+++ b/config/doom/config.org
@@ -278,14 +278,15 @@ this new window.
     (let* ((default-smtp-conf '("default" "mail.oscarnajera.com" 587 starttls "hi"))
            (smtp-from-server-alist
             '(("Oscar Najera <oscar.najera@tribe29.com>"
-               "mx.tribe29.com" 587 starttls "on")
+               "mx.tribe29.com" 587 starttls "oscar.najera")
               ("Oscar Najera <najera.oscar@gmail.com>"
                "smtp.googlemail.com" 587 starttls "najera.oscar")))
            (smtp-conf (alist-get (save-restriction
                                    (message-narrow-to-headers)
                                    (message-fetch-field "from"))
-                                 smtp-from-server-alist default-smtp-conf)))
-      (-let [(name server port protocol user) smtp-conf]
+                                 smtp-from-server-alist default-smtp-conf
+                                 nil #'string=)))
+      (-let [(server port protocol user) smtp-conf]
         (setq smtpmail-smtp-server server
               smtpmail-smtp-service port
               smtpmail-stream-type protocol
-- 
cgit v1.2.3