diff options
| author | David Thompson <dthompson@vistahigherlearning.com> | 2015-05-28 09:29:43 -0400 |
|---|---|---|
| committer | David Thompson <dthompson@vistahigherlearning.com> | 2015-05-28 09:29:43 -0400 |
| commit | a54a07d881bd33390d4e6193e5d83fe2d6757ad8 (patch) | |
| tree | 814c96e144762dc0ba916a9e32cc7fa49699acdb | |
| parent | ac88e41ddee3f1baea0b888bfbe0fb33320ba148 (diff) | |
emacs: Update needed packages and notmuch config.
| -rw-r--r-- | dotfiles/.emacs.d/init.el | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/dotfiles/.emacs.d/init.el b/dotfiles/.emacs.d/init.el index 57f54ec..ac5c821 100644 --- a/dotfiles/.emacs.d/init.el +++ b/dotfiles/.emacs.d/init.el @@ -32,7 +32,8 @@ rainbow-delimiters smex web-mode - projectile)) + projectile + markdown-mode)) (defun install-missing-packages () "Install all required packages that haven't been installed." @@ -330,8 +331,18 @@ might be bad." ("dthompson@vistahigherlearning.com" . "VHL/Sent Items") (".*" . "sent"))) + (defun recent-mail-by-tag (tag) + `(:name ,tag + :query ,(concat "tag:" tag " AND date:today..today") + :sort-order newest-first)) + (setf notmuch-saved-searches - '((:name "inbox" :query "tag:inbox" :sort-order newest-first))) + `((:name "inbox" + :query "tag:inbox" + :sort-order newest-first) + ,(recent-mail-by-tag "semaphore") + ,(recent-mail-by-tag "airbrake") + ,(recent-mail-by-tag "nagios"))) (define-key notmuch-search-mode-map "u" (lambda () |