From 02febe0d66e0c77209d9f5bc831f7a7c0f49d856 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Fri, 17 Sep 2021 01:29:01 +0100
Subject: nits

---
 email.org                |  2 +-
 lib/themes/jao-themes.el |  2 ++
 notmuch.org              | 10 +++++++---
 3 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/email.org b/email.org
index 43d97ea..c74ee35 100644
--- a/email.org
+++ b/email.org
@@ -246,7 +246,7 @@
 
     (require 'bbdb)
     (setq bbdb-file (expand-file-name "~/.emacs.d/bbdb"))
-    (bbdb-initialize 'message 'pgp 'mail)
+    (bbdb-initialize 'message 'pgp) ;; 'mail
    #+end_src
 * mailboxes
   #+begin_src emacs-lisp
diff --git a/lib/themes/jao-themes.el b/lib/themes/jao-themes.el
index ec6dcea..96e8398 100644
--- a/lib/themes/jao-themes.el
+++ b/lib/themes/jao-themes.el
@@ -204,6 +204,7 @@
                         (jao-themes--parse-face-body val)
                       val)))))
            (ul `(:underline ,(jao-themes--color (cadr s))))
+           (st `(:strike-through ,(jao-themes--color (cadr s))))
            (~ (cdr (assq (cadr s) *jao--parsed-faces*)))
            (t (list s))))
         ((atom s)
@@ -989,6 +990,7 @@
             (rst-level-7-face (~ outline-7))
             (rst-level-8-face (~ outline-8)))
           `((secondary-selection (p hilite) ex)
+            (separator-line (~ default) (st "grey85"))
             (sh-quoted-exec (p f00))
             (shortdoc-heading (p outline-1) nul)
             (shortdoc-section (p outline-2))
diff --git a/notmuch.org b/notmuch.org
index 4125893..b0e5cfc 100644
--- a/notmuch.org
+++ b/notmuch.org
@@ -63,7 +63,7 @@
             ,(jao-notmuch--q "bigml" "support" "bs")
             ,(jao-notmuch--q "bigml" "bugs" "bb")
             ,@(jao-notmuch--mboxes-search "bigml" "inbox" "support")
-            ,@(jao-notmuch--mboxes-search "jao")
+            ,@(jao-notmuch--mboxes-search "jao" "drafts")
             ,(jao-notmuch--qn "local" nil "l" '("tag:local"))
             ,(jao-notmuch--qn "emacs" "feeds" "ee" '("tag:emacs"))
             ,(jao-notmuch--qn "emacs" "github" "eg" '("tag:emacs-github"))
@@ -71,7 +71,11 @@
             ,(jao-notmuch--qn "emacs" "bugs" "eb" '("tag:emacs-bugs"))
             ,(jao-notmuch--qn "emacs" "diffs" "ec" '("tag:emacs-diffs"))
             ,(jao-notmuch--qn "feeds" "lobsters" "fl" '("tag:lobsters"))
-            ,(jao-notmuch--qn "feeds" "prog" "fp" '("tag:prog" "not tag:lobsters"))
+            ,(jao-notmuch--qn "feeds" "notmuch" "fn" '("tag:notmuch"))
+            ,(jao-notmuch--qn "feeds" "xmobar" "fx" '("tag:xmobar"))
+            ,(jao-notmuch--qn "feeds" "prog" "fp"
+                              '("tag:prog"
+                                "not tag:\"/(lobsters|xmobar|notmuch)/\""))
             ,@(jao-notmuch--mboxes-search "feeds" "emacs" "prog")
             ,(jao-notmuch--q "bml" "today" "tb" '("tag:bigml" "date:24h..") t)
             ,(jao-notmuch--q "jao" "today" "tj"
@@ -292,7 +296,7 @@
                     ("count" . "%-7s ")
                     ("authors" . "%-35s")
                     ("subject" . " %-100s")
-                    ("tags" . "(%s)")))
+                    (jao-notmuch-format-tags . "  (%s)")))
       :bind (:map notmuch-search-mode-map
              (("RET" . notmuch-tree-from-search-thread)
               ("M-RET" . notmuch-search-show-thread))))
-- 
cgit v1.2.3