[PATCH 2/4] VIM: move backward trough messages in thread mode

diff --git a/64/bfceca52eb62d8634581e592636ae267f6fc69 b/64/bfceca52eb62d8634581e592636ae267f6fc69
new file mode 100644 (file)
index 0000000..cb8f1b3
--- /dev/null
+++ b/64/bfceca52eb62d8634581e592636ae267f6fc69
@@ -0,0 +1,89 @@
+Return-Path: <telenczuk@unic.cnrs-gif.fr>\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 62C45429E4F\r
+       for <notmuch@notmuchmail.org>; Sat, 10 Jan 2015 04:03:40 -0800 (PST)\r
+X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
+X-Spam-Flag: NO\r
+X-Spam-Score: 2.438\r
+X-Spam-Level: **\r
+X-Spam-Status: No, score=2.438 tagged_above=-999 required=5\r
+       tests=[DNS_FROM_AHBL_RHSBL=2.438] 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 KuOE09vqfUVj for <notmuch@notmuchmail.org>;\r
+       Sat, 10 Jan 2015 04:03:36 -0800 (PST)\r
+Received: from smtp.webfaction.com (mail6.webfaction.com [74.55.86.74])\r
+       by olra.theworths.org (Postfix) with ESMTP id CD80F429E40\r
+       for <notmuch@notmuchmail.org>; Sat, 10 Jan 2015 04:03:34 -0800 (PST)\r
+Received: from localhost (87-231-242-54.rev.numericable.fr [87.231.242.54])\r
+       by smtp.webfaction.com (Postfix) with ESMTP id 152C12078836;\r
+       Sat, 10 Jan 2015 12:03:30 +0000 (UTC)\r
+From: Bartosz <telenczuk@unic.cnrs-gif.fr>\r
+To: notmuch@notmuchmail.org\r
+Subject: [PATCH 2/4] VIM: move backward trough messages in thread mode\r
+Date: Sat, 10 Jan 2015 13:03:02 +0100\r
+Message-Id: <1420891384-992-3-git-send-email-telenczuk@unic.cnrs-gif.fr>\r
+X-Mailer: git-send-email 1.9.3 (Apple Git-50)\r
+In-Reply-To: <1420891384-992-1-git-send-email-telenczuk@unic.cnrs-gif.fr>\r
+References: <1420891384-992-1-git-send-email-telenczuk@unic.cnrs-gif.fr>\r
+X-Mailman-Approved-At: Sat, 10 Jan 2015 10:22:24 -0800\r
+Cc: Bartosz <telenczuk@unic.cnrs-gif.fr>\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: Sat, 10 Jan 2015 12:03:40 -0000\r
+\r
+---\r
+ vim/notmuch.vim | 12 ++++++++----\r
+ 1 file changed, 8 insertions(+), 4 deletions(-)\r
+\r
+diff --git a/vim/notmuch.vim b/vim/notmuch.vim\r
+index 34d4f92..4f90d79 100644\r
+--- a/vim/notmuch.vim\r
++++ b/vim/notmuch.vim\r
+@@ -39,7 +39,8 @@ let g:notmuch_show_maps = {\r
+       \ 'p':          'show_save_patches()',\r
+       \ 'r':          'show_reply()',\r
+       \ '?':          'show_info()',\r
+-      \ '<Tab>':      'show_next_msg()',\r
++      \ '<Tab>':      'show_next_msg(1)',\r
++      \ '<S-Tab>':    'show_next_msg(-1)',\r
+       \ 'c':          'compose()',\r
+       \ }\r
+ \r
+@@ -114,15 +115,18 @@ EOF\r
+       call s:kill_this_buffer()\r
+ endfunction\r
+ \r
+-function! s:show_next_msg()\r
++function! s:show_next_msg(inc)\r
+ ruby << EOF\r
++      inc = VIM::evaluate('a:inc')\r
+       r, c = $curwin.cursor\r
+       n = $curbuf.line_number\r
+       i = $messages.index { |m| n >= m.start && n <= m.end }\r
+-      m = $messages[i + 1]\r
+-      if m\r
++      m = $messages[i + inc]\r
++      if m and !((i + inc)<0) \r
+               r = m.body_start + 1\r
++              VIM::command("normal zM")\r
+               VIM::command("normal #{m.start}zt")\r
++              VIM::command("normal zo")\r
+               $curwin.cursor = r, c\r
+       end\r
+ EOF\r
+-- \r
+1.9.3 (Apple Git-50)\r
+\r