diff options
author | Mark Walters <markwalters1009@gmail.com> | 2014-06-06 13:48:33 +0100 |
---|---|---|
committer | David Bremner <david@tethera.net> | 2014-07-15 20:06:41 -0300 |
commit | ef819eb689a75acbc118a3ddbb3ac975460a95c8 (patch) | |
tree | 02a8945092db83de2ad6cc9e7556750eb7385153 | |
parent | de262a20261a11b191f29db67ace8cdd3d504682 (diff) |
emacs: search archive tweak
notmuch-search-archive-thread moves to the next line after tagging. In
the normal case this makes sense, but if the region is active, it tags
the whole region and then it doesn't really. Thus only move to the
next line if region is not active.
-rw-r--r-- | emacs/notmuch.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/emacs/notmuch.el b/emacs/notmuch.el index f6bf9c84..2a9876fd 100644 --- a/emacs/notmuch.el +++ b/emacs/notmuch.el @@ -580,7 +580,8 @@ This function advances the next thread when finished." (when notmuch-archive-tags (notmuch-search-tag (notmuch-tag-change-list notmuch-archive-tags unarchive) beg end)) - (notmuch-search-next-thread)) + (when (eq beg end) + (notmuch-search-next-thread))) (defun notmuch-search-update-result (result &optional pos) "Replace the result object of the thread at POS (or point) by |