From: W. Trevor King <wking@tremily.us>
Date: Wed, 2 Jan 2013 16:16:39 +0000 (-0500)
Subject: .emacs|wtk_notmuch.el: Add Notmuch configuration
X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=87667efc0af952503b910ddb53f9ada5436e6911;p=dotfiles-public.git

.emacs|wtk_notmuch.el: Add Notmuch configuration
---

diff --git a/src/.emacs b/src/.emacs
index ad4d793..69b1c34 100644
--- a/src/.emacs
+++ b/src/.emacs
@@ -14,6 +14,7 @@
 (load "wtk_utf-8.el")
 (load "wtk_layout.el")
 (load "wtk_linux.el")
+(load "wtk_notmuch.el")
 (load "wtk_aspell.el")
 (load "wtk_epa.el")
 (load "wtk_org.el")
diff --git a/src/.emacs.d/site-lisp/wtk_notmuch.el b/src/.emacs.d/site-lisp/wtk_notmuch.el
new file mode 100644
index 0000000..db5b11b
--- /dev/null
+++ b/src/.emacs.d/site-lisp/wtk_notmuch.el
@@ -0,0 +1,7 @@
+(require 'notmuch)
+
+(define-key notmuch-search-mode-map "S"
+	(lambda ()
+		"mark messages in thread as spam"
+		(interactive)
+		(notmuch-search-tag '("+spam" "-inbox"))))