whitespace and shuffling

1 files changed, 26 insertions, 17 deletions

diff --git a/notmuch.org b/notmuch.org
index f4f111d..b5a8f26 100644
--- a/notmuch.org
+++ b/notmuch.org
@@ -12,14 +12,16 @@
                :face jao-themes-error)
         (:name "S" :query "tag:new and tag:bigml and tag:support")
         (:name "W" :query "tag:new and tag:bigml" :face jao-themes-dimm)
-        (:name "H" :query "tag:new and tag:jao and tag:hacking")
+        (:name "H" :query "tag:new and tag:jao and tag:hacking" :face jao-themes-dimm)
         (:name "T" :query "tag:new and tag:jao and tag:think" :face jao-themes-dimm)
         (:name "E" :query "tag:new and tag:\"/emacs/\"" :face jao-themes-dimm)
         (:name "l" :query "tag:new and tag:local" :face jao-themes-dimm)
         (:name "J" :query
-               "tag:new and tag:jao and not tag:\"/local|emacs|hacking|feeds|think/\""
+               "tag:new and tag:jao and not tag:\"/local|emacs|hacking|think/\""
                :face jao-themes-dimm)
         (:name "F" :query "tag:new and tag:feeds and not tag:\"/emacs/\""
+               :face jao-themes-dimm)
+        (:name "G" :query "tag:new and tag:gmane and not tag:\"/emacs|papers/\""
                :face jao-themes-dimm)))
 
     (defun jao-notmuch-notify ()
@@ -71,14 +73,20 @@
             ,(jao-notmuch--qn "emacs" "devel" "ed" '("tag:emacs-devel"))
             ,(jao-notmuch--qn "emacs" "bugs" "eb" '("tag:emacs-bugs"))
             ,(jao-notmuch--qn "emacs" "diffs" "ec" '("tag:emacs-diffs"))
+            ,(jao-notmuch--qn "feeds" "clojure" "fc" '("tag:clojure"))
+            ,(jao-notmuch--qn "feeds" "elixir" "fex" '("tag:elixir"))
+            ,(jao-notmuch--qn "feeds" "erlang" "fe" '("tag:erlang"))
+            ,(jao-notmuch--qn "feeds" "gnus" "fg" '("tag:gnus"))
+            ,(jao-notmuch--qn "feeds" "haskell" "fh" '("tag:haskell"))
+            ,(jao-notmuch--qn "feeds" "idris" "fid" '("tag:idris"))
             ,(jao-notmuch--qn "feeds" "lobsters" "fl" '("tag:lobsters"))
+            ,(jao-notmuch--qn "feeds" "mailutils" "fm" '("tag:mailutils"))
             ,(jao-notmuch--qn "feeds" "notmuch" "fn" '("tag:notmuch"))
-            ,(jao-notmuch--qn "feeds" "haskell" "fh" '("tag:haskell"))
-            ,(jao-notmuch--qn "feeds" "erlang" "fe" '("tag:erlang"))
+            ,(jao-notmuch--qn "feeds" "papers" "fax" '("tag:papers"))
+            ,(jao-notmuch--qn "feeds" "scheme" "fl" '("tag:scheme"))
             ,(jao-notmuch--qn "feeds" "xmobar" "fx" '("tag:xmobar"))
             ,(jao-notmuch--qn "feeds" "prog" "fp"
-                              '("tag:prog"
-                                "not tag:\"/(lobsters|xmobar|notmuch|haskell|erlang)/\""))
+                              '("tag:prog" "not tag:\"/(lobsters|clojure|xmobar|gmane)/\""))
             ,@(jao-notmuch--mboxes-search "feeds" "emacs" "prog")
             ,(jao-notmuch--q "jao" "draft" "d" '("tag:draft"))
             ,(jao-notmuch--q "bml" "today" "tb" '("tag:bigml" "date:24h.."))
@@ -131,7 +139,8 @@
               ("flagged" "!" (propertize tag 'face ',e))
               ("jao" "j")
               ("bigml" "b")
-              ("feeds" "f")))
+              ("feeds" "f")
+              ("gmane" "g")))
           notmuch-tag-deleted-formats
           '(("unread")
             ("new")
@@ -148,16 +157,16 @@
       (add-to-list 'load-path "/usr/local/share/emacs/site-lisp/"))
 
     (use-package notmuch
-      :init
-      (setq notmuch-draft-folder "jao/drafts"
-            notmuch-draft-quoted-tags '("part")
-            notmuch-address-internal-completion '(received nil)
-            notmuch-fcc-dirs
-            '(("\\(support\\|education\\)@bigml.com" . nil)
-              (".*@bigml.com" . "bigml/sent +bigml +sent -new")
-              (".*" . "jao/trove +jao +sent +trove -new"))
-            notmuch-maildir-use-notmuch-insert t
-            notmuch-message-headers '("Subject" "To" "Cc" "Date" "List-Id"))
+      :custom
+      ((notmuch-draft-folder "jao/drafts")
+       (notmuch-draft-quoted-tags '("part"))
+       (notmuch-address-internal-completion '(received nil))
+       (notmuch-fcc-dirs
+        '(("\\(support\\|education\\)@bigml.com" . nil)
+          (".*@bigml.com" . "bigml/sent +bigml +sent -new")
+          (".*" . "jao/trove +jao +sent +trove -new")))
+       (notmuch-maildir-use-notmuch-insert t)
+       (notmuch-message-headers '("Subject" "To" "Cc" "Date" "List-Id")))
 
       :config