diff options
| author | Alan Pearce | 2019-08-05 16:44:50 +0200 |
|---|---|---|
| committer | Alan Pearce | 2019-08-05 16:44:50 +0200 |
| commit | 11714f9162eb12273f1b241a2dad6ed4f6973385 (patch) | |
| tree | d9d2f03d539eaaed4395f5d7e6e50a5d0adb2904 | |
| parent | e275653231e711a4ede34babdb855913b6a80667 (diff) | |
| download | dotfiles-11714f9162eb12273f1b241a2dad6ed4f6973385.tar.lz dotfiles-11714f9162eb12273f1b241a2dad6ed4f6973385.tar.zst dotfiles-11714f9162eb12273f1b241a2dad6ed4f6973385.zip | |
Emacs: pick work context automatically on satoshipad
| -rw-r--r-- | emacs/.emacs.d/main.el | 7 |
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") |