From 11714f9162eb12273f1b241a2dad6ed4f6973385 Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Mon, 5 Aug 2019 16:44:50 +0200 Subject: Emacs: pick work context automatically on satoshipad --- emacs/.emacs.d/main.el | 7 ++++--- 1 file 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") -- cgit 1.4.1