b4/b3c05340cc935067104b417ea2c74803a6f8d6

   1 Return-Path: <markwalters1009@gmail.com>\r
   2 X-Original-To: notmuch@notmuchmail.org\r
   3 Delivered-To: notmuch@notmuchmail.org\r
   4 Received: from localhost (localhost [127.0.0.1])\r
   5         by olra.theworths.org (Postfix) with ESMTP id DB2CC431FAF\r
   6         for <notmuch@notmuchmail.org>; Sun, 15 Sep 2013 01:18:00 -0700 (PDT)\r
   7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: 0.201\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=0.201 tagged_above=-999 required=5\r
  12         tests=[DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1,\r
  13         FREEMAIL_ENVFROM_END_DIGIT=1, FREEMAIL_FROM=0.001,\r
  14         RCVD_IN_DNSWL_LOW=-0.7] autolearn=disabled\r
  15 Received: from olra.theworths.org ([127.0.0.1])\r
  16         by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
  17         with ESMTP id Y4Cs6SPBF8bq for <notmuch@notmuchmail.org>;\r
  18         Sun, 15 Sep 2013 01:17:55 -0700 (PDT)\r
  19 Received: from mail-wg0-f54.google.com (mail-wg0-f54.google.com\r
  20  [74.125.82.54])        (using TLSv1 with cipher RC4-SHA (128/128 bits))        (No client\r
  21  certificate requested) by olra.theworths.org (Postfix) with ESMTPS id\r
  22  2BE9B431FAE    for <notmuch@notmuchmail.org>; Sun, 15 Sep 2013 01:17:55 -0700\r
  23  (PDT)\r
  24 Received: by mail-wg0-f54.google.com with SMTP id m15so2629184wgh.9\r
  25         for <notmuch@notmuchmail.org>; Sun, 15 Sep 2013 01:17:54 -0700 (PDT)\r
  26 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113;\r
  27         h=from:to:cc:subject:date:message-id;\r
  28         bh=ivHaA+d1Qq6hEI8HmgSErJSboTZoky+SABe4IRludcc=;\r
  29         b=n4jiyxXSI90dUZgnjaToZ8iPDx74L4Lu8DNFgNw/z+7WOAm0XeuxfQATD+FXRN0FLF\r
  30         PK+a5Ym18JgJNDMrCLwF7At0NIMhl/EvL95/QbVlQ2Jxfevqilmga0PjunZr7//oLntV\r
  31         oAHvRCgAfv1Nhevui8FmF1S+qfrufSdX2u75aYrGgZBuaNRLcjOiQnrbXXXQqGFRl03q\r
  32         X2ikSC+No2YPpvnQbZMQFJGWXKC4MCxMgsjpamg6tLWK2TrsCZepgr6/rR145a1iq/Ck\r
  33         s5TDcH/WX3ek1IP2jsvYwyrVaJRU1V/oO/cOYfDaIl9RGghVDPfqA6XvggB9DL5GBW+b\r
  34         OIig==\r
  35 X-Received: by 10.194.22.97 with SMTP id c1mr44781wjf.43.1379233074017;\r
  36         Sun, 15 Sep 2013 01:17:54 -0700 (PDT)\r
  37 Received: from localhost (93-97-24-31.zone5.bethere.co.uk. [93.97.24.31])\r
  38         by mx.google.com with ESMTPSA id gp9sm14873159wib.8.1969.12.31.16.00.00\r
  39         (version=TLSv1.2 cipher=RC4-SHA bits=128/128);\r
  40         Sun, 15 Sep 2013 01:17:53 -0700 (PDT)\r
  41 From: Mark Walters <markwalters1009@gmail.com>\r
  42 To: notmuch@notmuchmail.org\r
  43 Subject: [PATCH] contrib: pick: use global keymap\r
  44 Date: Sun, 15 Sep 2013 09:17:48 +0100\r
  45 Message-Id: <1379233068-9626-1-git-send-email-markwalters1009@gmail.com>\r
  46 X-Mailer: git-send-email 1.7.9.1\r
  47 X-BeenThere: notmuch@notmuchmail.org\r
  48 X-Mailman-Version: 2.1.13\r
  49 Precedence: list\r
  50 List-Id: "Use and development of the notmuch mail system."\r
  51         <notmuch.notmuchmail.org>\r
  52 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  53         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  54 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
  55 List-Post: <mailto:notmuch@notmuchmail.org>\r
  56 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  57 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  58         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  59 X-List-Received-Date: Sun, 15 Sep 2013 08:18:01 -0000\r
  60 \r
  61 Austin recently introduced a new global keymap. This makes pick use\r
  62 this global map.\r
  63 \r
  64 In most cases pick needs to override this global map because\r
  65 it wants to close the message pane before doing the action. However,\r
  66 this documents the over-rides and makes it less likely that the pick\r
  67 bindings will get out of sync with the main bindings.\r
  68 ---\r
  69  contrib/notmuch-pick/notmuch-pick.el |   16 ++++++++++++----\r
  70  1 files changed, 12 insertions(+), 4 deletions(-)\r
  71 \r
  72 diff --git a/contrib/notmuch-pick/notmuch-pick.el b/contrib/notmuch-pick/notmuch-pick.el\r
  73 index cba9549..01ca4bd 100644\r
  74 --- a/contrib/notmuch-pick/notmuch-pick.el\r
  75 +++ b/contrib/notmuch-pick/notmuch-pick.el\r
  76 @@ -230,6 +230,17 @@ FUNC."\r
  77  \r
  78  (defvar notmuch-pick-mode-map\r
  79    (let ((map (make-sparse-keymap)))\r
  80 +    (set-keymap-parent map notmuch-common-keymap)\r
  81 +    ;; The following override the global keymap.\r
  82 +    ;; Override because we want to close message pane first.\r
  83 +    (define-key map "?" (notmuch-pick-close-message-pane-and #'notmuch-help))\r
  84 +    ;; Override because we first close message pane and then close pick buffer.\r
  85 +    (define-key map "q" 'notmuch-pick-quit)\r
  86 +    ;; Override because we close message pane after the search query is entered.\r
  87 +    (define-key map "s" 'notmuch-pick-to-search)\r
  88 +    ;; Override because we want to close message pane first.\r
  89 +    (define-key map "m" (notmuch-pick-close-message-pane-and #'notmuch-mua-new-mail))\r
  90 +\r
  91      (define-key map [mouse-1] 'notmuch-pick-show-message)\r
  92      ;; these use notmuch-show functions directly\r
  93      (define-key map "|" 'notmuch-show-pipe-message)\r
  94 @@ -244,20 +255,16 @@ FUNC."\r
  95      (define-key map "e" (notmuch-pick-to-message-pane #'notmuch-pick-button-activate))\r
  96  \r
  97      ;; bindings from show (or elsewhere) but we close the message pane first.\r
  98 -    (define-key map "m" (notmuch-pick-close-message-pane-and #'notmuch-mua-new-mail))\r
  99      (define-key map "f" (notmuch-pick-close-message-pane-and #'notmuch-show-forward-message))\r
 100      (define-key map "r" (notmuch-pick-close-message-pane-and #'notmuch-show-reply-sender))\r
 101      (define-key map "R" (notmuch-pick-close-message-pane-and #'notmuch-show-reply))\r
 102      (define-key map "V" (notmuch-pick-close-message-pane-and #'notmuch-show-view-raw-message))\r
 103 -    (define-key map "?" (notmuch-pick-close-message-pane-and #'notmuch-help))\r
 104  \r
 105      ;; The main pick bindings\r
 106 -    (define-key map "q" 'notmuch-pick-quit)\r
 107      (define-key map "x" 'notmuch-pick-quit)\r
 108      (define-key map "A" 'notmuch-pick-archive-thread)\r
 109      (define-key map "a" 'notmuch-pick-archive-message-then-next)\r
 110      (define-key map "=" 'notmuch-pick-refresh-view)\r
 111 -    (define-key map "s" 'notmuch-pick-to-search)\r
 112      (define-key map "z" 'notmuch-pick-to-pick)\r
 113      (define-key map "n" 'notmuch-pick-next-matching-message)\r
 114      (define-key map "p" 'notmuch-pick-prev-matching-message)\r
 115 @@ -849,6 +856,7 @@ Complete list of currently available key bindings:\r
 116  \r
 117    (interactive)\r
 118    (kill-all-local-variables)\r
 119 +  (setq notmuch-buffer-refresh-function #'notmuch-pick-refresh-view)\r
 120    (use-local-map notmuch-pick-mode-map)\r
 121    (setq major-mode 'notmuch-pick-mode\r
 122         mode-name "notmuch-pick")\r
 123 -- \r
 124 1.7.9.1\r
 125 \r