From a54a07d881bd33390d4e6193e5d83fe2d6757ad8 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@vistahigherlearning.com>
Date: Thu, 28 May 2015 09:29:43 -0400
Subject: emacs: Update needed packages and notmuch config.

---
 dotfiles/.emacs.d/init.el | 15 +++++++++++++--
 1 file 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 ()
-- 
cgit v1.2.3