[PATCH] VIM v2: Add a 'tag all' folder option.

diff --git a/60/6f73af95c376530ab7fdca3ce5162213e5feb7 b/60/6f73af95c376530ab7fdca3ce5162213e5feb7
new file mode 100644 (file)
index 0000000..7ab87a0
--- /dev/null
+++ b/60/6f73af95c376530ab7fdca3ce5162213e5feb7
@@ -0,0 +1,100 @@
+Return-Path: <imain@stemwinder.org>\r
+X-Original-To: notmuch@notmuchmail.org\r
+Delivered-To: notmuch@notmuchmail.org\r
+Received: from localhost (localhost [127.0.0.1])\r
+       by olra.theworths.org (Postfix) with ESMTP id C0BAC431FBC\r
+       for <notmuch@notmuchmail.org>; Wed,  1 Oct 2014 17:02:52 -0700 (PDT)\r
+X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
+X-Spam-Flag: NO\r
+X-Spam-Score: 0\r
+X-Spam-Level: \r
+X-Spam-Status: No, score=0 tagged_above=-999 required=5\r
+       tests=[RCVD_IN_DNSWL_NONE=-0.0001] autolearn=disabled\r
+Received: from olra.theworths.org ([127.0.0.1])\r
+       by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
+       with ESMTP id mGzCENFOL+Ck for <notmuch@notmuchmail.org>;\r
+       Wed,  1 Oct 2014 17:02:47 -0700 (PDT)\r
+Received: from cmta19.telus.net (cmta19.telus.net [209.171.16.92])\r
+       by olra.theworths.org (Postfix) with ESMTP id 3214F431FB6\r
+       for <notmuch@notmuchmail.org>; Wed,  1 Oct 2014 17:02:47 -0700 (PDT)\r
+Received: from ovo.mains.priv ([207.102.88.62]) by cmta19.telus.net with TELUS\r
+       id y02l1o0041LiWEf0102ljv; Wed, 01 Oct 2014 18:02:46 -0600\r
+X-Authority-Analysis: v=2.0 cv=fJznK+me c=1 sm=2\r
+       a=EcQDfIwDZEqJA1f7rVUV8Q==:17 a=S-IsBHyFrF4A:10 a=tsa3CZZnAAAA:8\r
+       a=z78UvuW0U1fkTmuEF7cA:9 a=EcQDfIwDZEqJA1f7rVUV8Q==:117\r
+X-Telus-Outbound-IP: 207.102.88.62\r
+From: Ian Main <imain@stemwinder.org>\r
+To: notmuch@notmuchmail.org\r
+Subject: [PATCH] VIM v2: Add a 'tag all' folder option.\r
+Date: Wed,  1 Oct 2014 17:02:42 -0700\r
+Message-Id: <1412208162-30436-1-git-send-email-imain@stemwinder.org>\r
+X-Mailer: git-send-email 1.9.3\r
+X-BeenThere: notmuch@notmuchmail.org\r
+X-Mailman-Version: 2.1.13\r
+Precedence: list\r
+List-Id: "Use and development of the notmuch mail system."\r
+       <notmuch.notmuchmail.org>\r
+List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
+List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
+List-Post: <mailto:notmuch@notmuchmail.org>\r
+List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
+List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
+       <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
+X-List-Received-Date: Thu, 02 Oct 2014 00:02:52 -0000\r
+\r
+This adds the ability to mark an entire folder as read (or any other\r
+tags you like once you map it).\r
+\r
+This update adds documentation for the command.\r
+\r
+    Ian\r
+---\r
+ vim/notmuch.txt |  1 +\r
+ vim/notmuch.vim | 11 +++++++++++\r
+ 2 files changed, 12 insertions(+)\r
+\r
+diff --git a/vim/notmuch.txt b/vim/notmuch.txt\r
+index 4374102..33cbe6e 100644\r
+--- a/vim/notmuch.txt\r
++++ b/vim/notmuch.txt\r
+@@ -47,6 +47,7 @@ MAPPINGS                                     *notmuch-mappings*\r
+ Folder view~\r
+ \r
+ <enter>       Show selected search\r
++A     Archive (-inbox -unread) an entire folder\r
+ s     Enter a new search\r
+ =     Refresh\r
+ c     Compose a new mail\r
+diff --git a/vim/notmuch.vim b/vim/notmuch.vim\r
+index 331e930..3f2444b 100644\r
+--- a/vim/notmuch.vim\r
++++ b/vim/notmuch.vim\r
+@@ -11,6 +11,7 @@ let g:loaded_notmuch = "yep"\r
+ let g:notmuch_folders_maps = {\r
+       \ '<Enter>':    'folders_show_search()',\r
+       \ 's':          'folders_search_prompt()',\r
++      \ 'A':          'folders_tag_all("-inbox -unread")',\r
+       \ '=':          'folders_refresh()',\r
+       \ 'c':          'compose()',\r
+       \ }\r
+@@ -378,6 +379,16 @@ ruby << EOF\r
+ EOF\r
+ endfunction\r
+ \r
++function! s:folders_tag_all(tags)\r
++ruby << EOF\r
++      n = $curbuf.line_number\r
++      s = $searches[n - 1]\r
++      t = VIM::evaluate('a:tags')\r
++      do_tag(s, t)\r
++EOF\r
++      call s:folders_refresh()\r
++endfunction\r
++\r
+ function! s:folders()\r
+       call s:new_buffer('folders')\r
+       ruby folders_render()\r
+-- \r
+1.9.3\r
+\r