From fc16599a4a1141643916321b6bab2bd49a8e9306 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Thu, 29 Apr 2021 01:52:43 +0100
Subject: pkcs7 signatures

---
 email.org | 27 ++++++++++++++++++---------
 1 file changed, 18 insertions(+), 9 deletions(-)

(limited to 'email.org')

diff --git a/email.org b/email.org
index 755e066..7f957dd 100644
--- a/email.org
+++ b/email.org
@@ -312,6 +312,10 @@
             nnrss-directory (jao-gnus-dir "rss"))
     #+end_src
 * notmuch
+*** local path
+    #+begin_src emacs-lisp
+      (jao-load-path "notmuch")
+    #+end_src
 *** jumping from/to index
     #+begin_src emacs-lisp
       (defvar-local jao-notmuch--tree-buffer nil)
@@ -495,7 +499,8 @@
               ,(jao-notmuch--q "bml/today" nil "tb" '("tag:bigml" "date:1d.."))
               ,(jao-notmuch--q "jao/today" nil "tj" '("tag:jao" "date:1d.."))
               ,(jao-notmuch--q "flagged" nil "r" '("tag:flagged"))
-              ,(jao-notmuch--q "new" nil "n" '("tag:new"))))
+              ,(jao-notmuch--q "new" nil "n" '("tag:new"))
+              ,(jao-notmuch--q "draft" nil "d" '("tag:draft"))))
     #+end_src
 *** hello
     #+begin_src emacs-lisp
@@ -607,11 +612,11 @@
               (scroll-other-window 1)
             (notmuch-tree-show-message nil)))
 
-        (defun jao-notmuch-tree-delete-next (thread)
-          "Mark as deleted current message (or thread, with prefix) and move to next."
-          (interactive "P")
-          (jao-notmuch-tree--tag-next '("+deleted" "-unread" "-new") nil thread))
-
+        (defun jao-notmuch-tree-delete-next ()
+          "Mark as deleted current message and move to next."
+          (interactive)
+          (notmuch-tree-tag (notmuch-tag-change-list '("+deleted" "-unread" "-new")))
+          (notmuch-tree-next-message))
 
         (defun jao-notmuch-tree-read-thread-next ()
           "Mark the current thread as read and move to next one."
@@ -659,11 +664,9 @@
 *** main
     #+begin_src emacs-lisp
       (use-package notmuch
-        :ensure t
         :demand t
-
         :init
-        (setq notmuch-crypto-process-mime nil
+        (setq notmuch-crypto-process-mime t
               notmuch-show-mark-read-tags '("-new" "-unread")
               notmuch-archive-tags '("+trove" "-new" "-unread" "-flagged")
               notmuch-tagging-keys
@@ -771,3 +774,9 @@
       notmuch new > $HOME/var/log/notmuch-expire.log 2>&1
       notmuch compact >> $HOME/var/log/notmuch-expire.log 2>&1
     #+end_src
+*** gpgsm.conf (decrypt smime)
+    #+begin_src conf :tangle ~/.gnupg/gpgsm.conf :shebang ""
+      # needed to avoid remote checks of smime signatures
+      # and notmuch-crypto-process-mime to work with them
+      disable-crl-checks
+    #+end_src
-- 
cgit v1.2.3