X-Git-Url: https://git.friedersdorff.com/?a=blobdiff_plain;ds=sidebyside;f=emacs%2F.emacs;h=bf43b9c68aad1913a53f3e18dab9bbe4c3fa47b7;hb=541ca7adb5397879e64a674437aade7cf3833a1a;hp=d04d89ed9193e55817cec543edd42b12d39d64dc;hpb=f3372206cdfa91e83a504f368ad7075a22d04a09;p=max%2Fdotfiles.git

diff --git a/emacs/.emacs b/emacs/.emacs
index d04d89e..bf43b9c 100644
--- a/emacs/.emacs
+++ b/emacs/.emacs
@@ -146,6 +146,7 @@
    message-send-mail-function 'smtpmail-send-it
    smtpmail-default-smtp-server "mail.friedersdorff.com"
    smtpmail-auth-credentials (expand-file-name "~/.authinfo.gpg"))
+  (setq mu4e-drafts-folder "/Drafts")
   (setq mu4e-contexts
 	`( , (make-mu4e-context
 	      :name "Personal"
@@ -158,7 +159,6 @@
 	      :vars '((user-mail-address . "max@friedersdorff.com")
 		      (user-full-name . "Maximilian Friedersdorff")
 		      (mu4e-sent-folder . "/personal/Sent")
-		      (mu4e-drafts-folder . "/personal/Drafts")
 		      (mu4e-trash-folder . "/personal/Trash")
 		      (smtpmail-smtp-server . "mail.friedersdorff.com")
 		      (smtpmail-smtp-service . 587))),
@@ -174,7 +174,6 @@
 		     (user-full-name . "Maximilian Friedersdorff")
 		     (mu4e-sent-folder . "/personal-gmail/Sent")
 		     (mu4e-sent-messages-behaviour . 'delete)
-		     (mu4e-drafts-folder . "/personal-gmail/Drafts")
 		     (smtpmail-smtp-server . "smtp.gmail.com")
 		     (smtpmail-smtp-service . 587))),
 	    (make-mu4e-context
@@ -188,13 +187,24 @@
 	     :vars '((user-mail-address . "maf54@aber.ac.uk")
 		     (user-full-name . "Maximilian Friedersdorff")
 		     (mu4e-sent-folder . "/aber/Sent")
-		     (mu4e-drafts-folder . "/aber/Drafts")
 		     (mu4e-trash-folder . "/aber/Trash")
 		     (smtpmail-smtp-server . "smtp.office365.com")
 		     (smtpmail-smtp-service . 587))))
 
 	mu4e-context-policy 'pick-first)
-  (setq mu4e-html2text-command "lynx -stdin -dump -force_html"))
+  (setq mu4e-html2text-command "lynx -stdin -dump -force_html")
+  (add-to-list 'mu4e-bookmarks
+	       '((concatenate
+		  'string
+		  "flag:unread "
+		  "AND ( "
+		  "maildir:/personal/Inbox OR "
+		  "maildir:/personal/slackware OR "
+		  "maildir:/personal-gmail/Inbox OR "
+		  "maildir:/aber/Inbox "
+		  ")") "Unread Interesting Messages" ?i)
+	       ))
+
 (use-package mu4e-alert
   :ensure t
   :config