notmuch tagging

1 files changed, 35 insertions, 0 deletions

diff --git a/email.org b/email.org
index f96b701..d641ede 100644
--- a/email.org
+++ b/email.org
@@ -635,6 +635,41 @@
                     (("h" . jao-notmuch-goto-index-buffer))
                     :map notmuch-common-keymap
                     (("B" . jao-notmuch-browse-urls))))
+
+    #+end_src
+*** hydras
+    #+begin_src emacs-lisp
+      (major-mode-hydra-define notmuch-search-mode nil
+        ("Tagging"
+         (("*" notmuch-search-tag-all "tag all")
+          ("+" notmuch-search-add-tag "add tag")
+          ("-" notmuch-search-remove-tag "add tag")
+          ("k" notmuch-tag-jump "jump to tag"))
+         "Search"
+         (("l" notmuch-search-filter "filter with additional query")
+          ("t" notmuch-search-filter-by-tag "filter by tag")
+          ("y" notmuch-stash-query "stash current query"))
+         "Moving around"
+         (("b" notmuch-search-scroll-down "scroll down")
+          ("<" notmuch-search-first-thread "first thread")
+          (">" notmuch-search-last-thread "last thread"))))
+
+      (major-mode-hydra-define notmuch-tree-mode nil
+        ("View"
+         (("." jao-notmuch-toggle-mime-parts "toggle mime parts")
+          ("i" jao-notmuch-toggle-images "toggle images")
+          ("a" notmuch-tree-archive-thread-then-next "archive thread")
+          ("C" jao-notmuch-echo-count "echo unread count"))
+         "Mark"
+         (("d" jao-notmuch-tree-delete-message "delete message")
+          ("D" jao-notmuch-tree-delete-thread "delete thread")
+          ("u" (jao-notmuch-tree-delete-message t) "undelete message")
+          ("k" jao-notmuch-tree-read-thread "kill thread"))
+         "Edit/send"
+         (("r" notmuch-tree-reply-sender "reply sender")
+          ("R" notmuch-tree-reply "reply all")
+          ("f" notmuch-tree-forward-message "forward")
+          ("e" notmuch-tree-resume-message "edit draft"))))
     #+end_src
 *** address clean-ups
     #+begin_src emacs-lisp