summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2019-08-05 16:44:50 +0200
committerAlan Pearce2019-08-05 16:44:50 +0200
commit11714f9162eb12273f1b241a2dad6ed4f6973385 (patch)
treed9d2f03d539eaaed4395f5d7e6e50a5d0adb2904
parente275653231e711a4ede34babdb855913b6a80667 (diff)
downloaddotfiles-11714f9162eb12273f1b241a2dad6ed4f6973385.tar.lz
dotfiles-11714f9162eb12273f1b241a2dad6ed4f6973385.tar.zst
dotfiles-11714f9162eb12273f1b241a2dad6ed4f6973385.zip
Emacs: pick work context automatically on satoshipad
-rw-r--r--emacs/.emacs.d/main.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/emacs/.emacs.d/main.el b/emacs/.emacs.d/main.el
index 686cc6f..4769039 100644
--- a/emacs/.emacs.d/main.el
+++ b/emacs/.emacs.d/main.el
@@ -653,9 +653,10 @@ With two prefix arguments, write out the day and month name."
                                  (make-mu4e-context
                                   :name "SatoshiPay"
                                   :match-func (lambda (msg)
-                                                (when msg
-                                                  (mu4e-message-contact-field-matches
-                                                   msg :to "alan@satoshipay.io")))
+                                                (if msg
+                                                    (mu4e-message-contact-field-matches
+                                                     msg :to "alan@satoshipay.io")
+                                                  (string-equal system-name "satoshipad")))
                                   :vars '((user-mail-address . "alan@satoshipay.io")
                                           (mu4e-sent-messages-behavior . 'delete)
                                           (mu4e-drafts-folder . "/satoshipay/Drafts")