From 3cac5f8acb3bf98636a81e44c620fd550843ed53 Mon Sep 17 00:00:00 2001 From: Felipe Contreras Date: Thu, 9 Dec 2010 20:58:03 +0200 Subject: [PATCH] vim: refactor tagging stuff Signed-off-by: Felipe Contreras --- vim/plugin/notmuch.vim | 18 ++++++++++-------- 1 file changed, 10 insertions(+), 8 deletions(-) diff --git a/vim/plugin/notmuch.vim b/vim/plugin/notmuch.vim index bdf03ba6..f4a4f233 100644 --- a/vim/plugin/notmuch.vim +++ b/vim/plugin/notmuch.vim @@ -308,12 +308,12 @@ function! s:NM_search_edit() endfunction function! s:NM_search_archive_thread() - call NM_add_remove_tags([], '-', ['inbox']) + call NM_tag([], ['-inbox']) norm j endfunction function! s:NM_search_mark_read_then_archive_thread() - call NM_add_remove_tags([], '-', ['unread', 'inbox']) + call NM_tag([], ['-unread', '-inbox']) norm j endfunction @@ -404,7 +404,8 @@ function! s:NM_search_add_remove_tags(prompt, prefix, intags) else let tags = a:intags endif - call NM_add_remove_tags([], a:prefix, tags) + call map(tags, 'a:prefix . v:val') + call NM_tag([], tags) endfunction " --- implement show screen {{{1 @@ -498,7 +499,7 @@ function! s:NM_show_archive_thread() endfunction function! s:NM_show_mark_read_then_archive_thread() - call NM_add_remove_tags(b:nm_search_words, '-', ['unread', 'inbox']) + call NM_tag(b:nm_search_words, ['-unread', '-inbox']) call NM_show_next_thread() endfunction @@ -562,7 +563,8 @@ function! s:NM_show_advance_marking_read_and_archiving() let filter = NM_combine_tags('tag:', advance_tags, 'OR', '()') \ + ['AND'] \ + NM_combine_tags('', ids, 'OR', '()') - call NM_add_remove_tags(filter, '-', advance_tags) + call map(advance_tags, '"+" . v:val') + call NM_tag(filter, advance_tags) call NM_show_next(1, 1) return endif @@ -581,7 +583,8 @@ function! s:NM_show_advance_marking_read_and_archiving() " do this last to hide the latency let filter = NM_combine_tags('tag:', advance_tags, 'OR', '()') \ + ['AND', msg_top['id']] - call NM_add_remove_tags(filter, '-', advance_tags) + call map(advance_tags, '"-" . v:val') + call NM_tag(filter, advance_tags) endif return endif @@ -1265,12 +1268,11 @@ function! s:NM_search_expand(arg) let b:nm_prev_bufnr = prev_bufnr endfunction -function! s:NM_add_remove_tags(filter, prefix, tags) +function! s:NM_tag(filter, tags) let filter = len(a:filter) ? a:filter : [NM_search_thread_id()] if !len(filter) throw 'Eeek! I couldn''t find the thead id!' endif - call map(a:tags, 'a:prefix . v:val') let args = ['tag'] call extend(args, a:tags) call add(args, '--')