From 563ec94ec40622bfdccd51702b38401933d6c3ca Mon Sep 17 00:00:00 2001
From: Sakooooo <78461130+Sakooooo@users.noreply.github.com>
Date: Sat, 28 Sep 2024 22:07:24 +0400
Subject: [PATCH] config/emacs: kms

---
 config/emacs/emacs.org | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/config/emacs/emacs.org b/config/emacs/emacs.org
index e1a4024f..f595de7f 100644
--- a/config/emacs/emacs.org
+++ b/config/emacs/emacs.org
@@ -1178,7 +1178,7 @@ GNU patch review metho dor sometihng idk
       	  (lambda (msg)
       	    (when msg
       	      (string-prefix-p "/Outlook" (mu4e-message-field msg :maildir))))
-      	  :vars `((user-mail-address . (lambda () (cdr (assoc 'outlook sakomacs-mail-accounts))))
+      	  :vars `((user-mail-address . ,(cdr (assoc 'outlook sakomacs-mail-accounts)))
       	          (user-full-name . "Sako")
       		  (mu4e-drafts-folder . "/Outlook/Drafts")
       		  (mu4e-sent-folder . "/Outlook/Sent")
@@ -1192,7 +1192,7 @@ GNU patch review metho dor sometihng idk
       	  (lambda (msg)
       	    (when msg
       	      (string-prefix-p "/Proton" (mu4e-message-field msg :maildir))))
-      	  :vars `((user-mail-address . (lambda () (cdr (assoc 'protonmail sakomacs-mail-accounts))))
+      	  :vars `((user-mail-address . ,(cdr (assoc 'protonmail sakomacs-mail-accounts)))
       	          (user-full-name . "Sako")
       		  (mu4e-drafts-folder . "/Proton/Drafts")
       		  (mu4e-sent-folder . "/Proton/Sent")
@@ -1206,7 +1206,7 @@ GNU patch review metho dor sometihng idk
     	  (lambda (msg)
     	    (when msg
     	      (string-prefix-p "/Gmail-Personal-1" (mu4e-message-field msg :maildir))))
-    	  :vars `((user-mail-address .  (lambda () (cdr (assoc 'gmail-1 sakomacs-mail-accounts))))
+    	  :vars `((user-mail-address .  ,(cdr (assoc 'gmail-1 sakomacs-mail-accounts)))
     		  (user-full-name . "Sako")
     		  (mu4e-drafts-folder . "/Gmail-Personal-1/Drafts")
     		  (mu4e-sent-folder . "/Gmail-Personal-1/Sent Mail")
@@ -1220,7 +1220,7 @@ GNU patch review metho dor sometihng idk
     	  (lambda (msg)
     	    (when msg
     	      (string-prefix-p "/Gmail-Personal-2" (mu4e-message-field msg :maildir))))
-    	  :vars `((user-mail-address . (lambda () (cdr (assoc 'gmail-2 sakomacs-mail-accounts))))
+    	  :vars `((user-mail-address . ,(cdr (assoc 'gmail-2 sakomacs-mail-accounts)))
     		  (user-full-name . "Sako")
     		  (mu4e-drafts-folder . "/Gmail-Personal-2/Drafts")
     		  (mu4e-sent-folder . "/Gmail-Personal-2/Sent Mail")