[PATCH 1/1] Add a function for applying an arbitrary number of tags to the highlighted message thread while in notmuch-search-mode. Intended to restore the original functionality of notmuch-search-remove-tag and notmuch-search-add-tag prior to 2beaefa2.

[PATCH 1/1] Add a function for applying an arbitrary number of tags to the highlighted message thread while in notmuch-search-mode. Intended to restore the original functionality of notmuch-search-remove-tag and notmuch-search-add-tag prior to 2beaefa2.

[Tim Bielawa]

---
 emacs/notmuch.el |    9 +++++++++
 1 files changed, 9 insertions(+), 0 deletions(-)

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 99e0c93..b731c7c 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -663,6 +663,15 @@ added or removed for all threads in the region from BEG to END."
   (interactive)
   (notmuch-search-tag "-"))
 
+(defun notmuch-search-tag-and-advance (&rest tags)
+  "Apply a tag or set of tags to the current thread.
+
+Shortcut to simplify applying tags in search mode. Targeted for
+use in key-bound functions. Advances to the next thread after
+applying the tags."
+  (mapc 'notmuch-search-tag-thread tags)
+  (notmuch-search-next-thread))
+
 (defun notmuch-search-archive-thread ()
   "Archive the currently selected thread (remove its \"inbox\" tag).
 
-- 
1.7.4.4

[PATCH] Function to apply many tags in notmuch-search-mode

[Tim Bielawa]

Add a function for applying an arbitrary number of tags to the
highlighted message thread while in notmuch-search-mode. Intended to
restore the original functionality of notmuch-search-remove-tag and
notmuch-search-add-tag prior to 2beaefa2.
---
 emacs/notmuch.el |    9 +++++++++
 1 files changed, 9 insertions(+), 0 deletions(-)

diff --git a/emacs/notmuch.el b/emacs/notmuch.el
index 99e0c93..b731c7c 100644
--- a/emacs/notmuch.el
+++ b/emacs/notmuch.el
@@ -663,6 +663,15 @@ added or removed for all threads in the region from BEG to END."
   (interactive)
   (notmuch-search-tag "-"))
 
+(defun notmuch-search-tag-and-advance (&rest tags)
+  "Apply a tag or set of tags to the current thread.
+
+Shortcut to simplify applying tags in search mode. Targeted for
+use in key-bound functions. Advances to the next thread after
+applying the tags."
+  (mapc 'notmuch-search-tag-thread tags)
+  (notmuch-search-next-thread))
+
 (defun notmuch-search-archive-thread ()
   "Archive the currently selected thread (remove its \"inbox\" tag).
 
-- 
1.7.4.4

Re: [PATCH 1/1] Add a function....

[Tim Bielawa]

[-- Attachment #1: Type: text/plain, Size: 1467 bytes --]

Sorry about the subject spam in that first message

Backstory: When I switched to a newer 0.12 build the function I was
using at the time stopped letting me tag messages while in search
mode. notmuch-search-remove-tag had been changed to take 0
arguments. Old function:

> (defun notmuch-search-delete ()
>   "Remove 'unread' tag"
>   (interactive)
>   (notmuch-search-remove-tag "unread")
>   (forward-line))
>
> (define-key notmuch-search-mode-map "u" 'notmuch-search-delete)
 
I don't typically go into threads to mark them unread. But that
kind of functionality is all I could find on the updated emacstips, lots
of "notmuch-show-*" functions. [0]

This patch tries to remedy that by introducing a function,
notmuch-search-tag-and-advance which allows you to apply a number of
tags at once to the current thread under the point --
non-interactively. It follows the form of the
notmuch-search-archive-thread function.

This github gist [1] is a .el file that I load with notmuch. It includes
the new defun in full and demonstrates how to use it in a custom
function mapped to a key.

If this patch is accepted I would be happy to hash-out something to add
to the emacs tips docs.


[0] http://notmuchmail.org/emacstips/#index6h2
[1] https://gist.github.com/1996899

-- 
Tim Bielawa, Software Engineer/Scribe
Production Control Team (RDU)
919.332.6411 Cell | IRC: tbielawa
1BA0 4FAB 4C13 FBA0 A036  4958 AD05 E75E 0333 AE37

[-- Attachment #2: Type: application/pgp-signature, Size: 162 bytes --]