da/862c97660e661694715aa045b256bb3b98034a

   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 arlo.cworth.org (Postfix) with ESMTP id 1366D6DE020B\r
   6  for <notmuch@notmuchmail.org>; Tue,  9 Jun 2015 02:51:21 -0700 (PDT)\r
   7 X-Virus-Scanned: Debian amavisd-new at cworth.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: 0.52\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=0.52 tagged_above=-999 required=5 tests=[AWL=1.090,\r
  12  DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1,\r
  13  FREEMAIL_ENVFROM_END_DIGIT=0.25, FREEMAIL_FROM=0.001,\r
  14  RCVD_IN_DNSWL_LOW=-0.7, RCVD_IN_MSPIKE_H3=-0.01,\r
  15  RCVD_IN_MSPIKE_WL=-0.01, SPF_PASS=-0.001] autolearn=disabled\r
  16 Received: from arlo.cworth.org ([127.0.0.1])\r
  17  by localhost (arlo.cworth.org [127.0.0.1]) (amavisd-new, port 10024)\r
  18  with ESMTP id qXA9FLGlvQAZ for <notmuch@notmuchmail.org>;\r
  19  Tue,  9 Jun 2015 02:51:19 -0700 (PDT)\r
  20 Received: from mail-wg0-f54.google.com (mail-wg0-f54.google.com\r
  21  [74.125.82.54]) by arlo.cworth.org (Postfix) with ESMTPS id 150966DE0159 for\r
  22  <notmuch@notmuchmail.org>; Tue,  9 Jun 2015 02:51:19 -0700 (PDT)\r
  23 Received: by wgbgq6 with SMTP id gq6so8729896wgb.3\r
  24  for <notmuch@notmuchmail.org>; Tue, 09 Jun 2015 02:51:16 -0700 (PDT)\r
  25 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20120113;\r
  26  h=from:to:cc:subject:date:message-id;\r
  27  bh=ojzKQWo/yc/XsnnYo60d6LOEQihVQNCl7dEkTyPtcX0=;\r
  28  b=mrkmbV9t+HT796Dc5FxdeLnN1MBFsJALNMLg7ri91fhGbpIUQ+a0N0XrKFnA9VhUTk\r
  29  RLGKEzjT4JTvdf1bedvx6yioen6QCMDJJ2SuOBj6q59q9jAM7y2X2cAo74CmYonV24RZ\r
  30  u+FYgxNLbhxzSwhuasEbmc1/6mXtcrlQrR+3CCyIF12nZ0O3bLeLBUdYypulugmogS7q\r
  31  f2ztK4zosJd6zd10dog1/NqNVYJiTbbonapdN6jPHP/jE0niXBnPT/hwEyz70Z1Ish+s\r
  32  qekZNAdB4zIWbjjxYQslTN6xIOxNKZ8WE5rM6mYnKks5dCA796EjvqSOwTM9skW5wu/9\r
  33  1wLA==\r
  34 X-Received: by 10.194.206.65 with SMTP id lm1mr40923092wjc.117.1433843475984; \r
  35  Tue, 09 Jun 2015 02:51:15 -0700 (PDT)\r
  36 Received: from localhost (5751dfa2.skybroadband.com. [87.81.223.162])\r
  37  by mx.google.com with ESMTPSA id a19sm1968853wiv.2.2015.06.09.02.51.15\r
  38  (version=TLSv1.2 cipher=ECDHE-RSA-AES128-GCM-SHA256 bits=128/128);\r
  39  Tue, 09 Jun 2015 02:51:15 -0700 (PDT)\r
  40 From: Mark Walters <markwalters1009@gmail.com>\r
  41 To: notmuch@notmuchmail.org\r
  42 Subject: [PATCH] emacs: tree: mark read change\r
  43 Date: Tue,  9 Jun 2015 10:51:07 +0100\r
  44 Message-Id: <1433843467-32398-1-git-send-email-markwalters1009@gmail.com>\r
  45 X-Mailer: git-send-email 2.1.4\r
  46 X-BeenThere: notmuch@notmuchmail.org\r
  47 X-Mailman-Version: 2.1.18\r
  48 Precedence: list\r
  49 List-Id: "Use and development of the notmuch mail system."\r
  50  <notmuch.notmuchmail.org>\r
  51 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  52  <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  53 List-Archive: <http://notmuchmail.org/pipermail/notmuch/>\r
  54 List-Post: <mailto:notmuch@notmuchmail.org>\r
  55 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  56 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  57  <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  58 X-List-Received-Date: Tue, 09 Jun 2015 09:51:21 -0000\r
  59 \r
  60 The mark read code for tree mode did not get updated in the recent\r
  61 changes. This updates it to match. Since the user can customize the\r
  62 mark read logic we just call the show logic in the message pane.\r
  63 ---\r
  64 \r
  65 An alternative would be to mark any message explicitly viewed in\r
  66 tree-mode as read. That would be simpler but I think this is better as\r
  67 it deals with user customized mark read functions -- for example if\r
  68 the user has a customized function that only marks a message read if\r
  69 the whole message is viewed then this version will do the same in tree\r
  70 mode.\r
  71 \r
  72 Best wishes\r
  73 \r
  74 Mark\r
  75 \r
  76 \r
  77 \r
  78 emacs/notmuch-tree.el | 8 ++++++++\r
  79  1 file changed, 8 insertions(+)\r
  80 \r
  81 diff --git a/emacs/notmuch-tree.el b/emacs/notmuch-tree.el\r
  82 index 8b6cd51..182235e 100644\r
  83 --- a/emacs/notmuch-tree.el\r
  84 +++ b/emacs/notmuch-tree.el\r
  85 @@ -413,6 +413,13 @@ (defun notmuch-tree-message-window-kill-hook ()\r
  86        (ignore-errors\r
  87         (delete-window notmuch-tree-message-window)))))\r
  88  \r
  89 +(defun notmuch-tree-command-hook ()\r
  90 +  (when (eq major-mode 'notmuch-tree-mode)\r
  91 +    ;; We just run the notmuch-show-command-hook on the message pane.\r
  92 +    (when (buffer-live-p notmuch-tree-message-buffer)\r
  93 +      (with-current-buffer notmuch-tree-message-buffer\r
  94 +       (notmuch-show-command-hook)))))\r
  95 +\r
  96  (defun notmuch-tree-show-message-in ()\r
  97    "Show the current message (in split-pane)."\r
  98    (interactive)\r
  99 @@ -855,6 +862,7 @@ (defun notmuch-tree-worker (basic-query &optional query-context target open-targ\r
 100  the same as for the function notmuch-tree."\r
 101    (interactive)\r
 102    (notmuch-tree-mode)\r
 103 +  (add-hook 'post-command-hook #'notmuch-tree-command-hook t t)\r
 104    (setq notmuch-tree-basic-query basic-query)\r
 105    (setq notmuch-tree-query-context query-context)\r
 106    (setq notmuch-tree-target-msg target)\r
 107 -- \r
 108 2.1.4\r
 109 \r