debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-11-25 04:18:08 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: eliminate search-tag-thread in favor of just search-tag

Browse source 
notmuch-search-tag-thread is now completely redundant with
notmuch-search-tag so we eliminate it to simplify the interface.
This commit is contained in:
Jameson Graef Rollins 2012-04-14 11:52:54 -07:00 committed by David Bremner
parent c1bcf5f8c0
commit 904a807088
1 changed files with 1 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
emacs/notmuch.el
View file

@ -517,12 +517,6 @@ and will also appear in a buffer named \"*Notmuch errors*\"."
(forward-line 1)) (forward-line 1))
output))) output)))
(defun notmuch-search-tag-thread (&rest tag-changes)
"Change tags for the currently selected thread.
See `notmuch-search-tag-region' for details."
(apply 'notmuch-search-tag-region (point) (point) tag-changes))
(defun notmuch-search-tag-region (beg end &optional tag-changes) (defun notmuch-search-tag-region (beg end &optional tag-changes)
"Change tags for threads in the given region." "Change tags for threads in the given region."
(let ((search-string (notmuch-search-find-thread-id-region-search beg end))) (let ((search-string (notmuch-search-find-thread-id-region-search beg end)))
@ -560,7 +554,7 @@ See `notmuch-tag' for information on the format of TAG-CHANGES."
This function advances the next thread when finished." This function advances the next thread when finished."
(interactive) (interactive)
(notmuch-search-tag-thread "-inbox") (notmuch-search-tag '("-inbox"))
(notmuch-search-next-thread)) (notmuch-search-next-thread))
(defvar notmuch-search-process-filter-data nil (defvar notmuch-search-process-filter-data nil