4b/8965fa7a5a7f6d72e8c78b6fd162f5671d1a44

   1 Return-Path: <notmuch@kismala.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 789C5429E3A\r
   6         for <notmuch@notmuchmail.org>; Fri, 16 Aug 2013 13:41:29 -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\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=0 tagged_above=-999 required=5 tests=[none]\r
  12         autolearn=disabled\r
  13 Received: from olra.theworths.org ([127.0.0.1])\r
  14         by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
  15         with ESMTP id k71jsdJUjTlt for <notmuch@notmuchmail.org>;\r
  16         Fri, 16 Aug 2013 13:41:23 -0700 (PDT)\r
  17 X-Greylist: delayed 1017 seconds by postgrey-1.32 at olra;\r
  18         Fri, 16 Aug 2013 13:41:23 PDT\r
  19 Received: from imarko.xen.prgmr.com (imarko.xen.prgmr.com [71.19.158.228])\r
  20         by olra.theworths.org (Postfix) with ESMTP id 4EB2A431E82\r
  21         for <notmuch@notmuchmail.org>; Fri, 16 Aug 2013 13:41:23 -0700 (PDT)\r
  22 Received: from localhost ([127.0.0.1] helo=zsu.kismala.com)\r
  23         by imarko.xen.prgmr.com with esmtp (Exim 4.80.1)\r
  24         (envelope-from <notmuch@kismala.com>) id 1VAQZL-0003b8-Ub\r
  25         for notmuch@notmuchmail.org; Fri, 16 Aug 2013 13:24:24 -0700\r
  26 From: Istvan Marko <notmuch@kismala.com>\r
  27 To: notmuch@notmuchmail.org\r
  28 Subject: [PATCH] emacs: add buttons for all multipart/related parts\r
  29 Date: Fri, 16 Aug 2013 13:24:23 -0700\r
  30 Message-ID: <m3r4dtgz9k.fsf@zsu.kismala.com>\r
  31 MIME-Version: 1.0\r
  32 Content-Type: text/plain\r
  33 X-BeenThere: notmuch@notmuchmail.org\r
  34 X-Mailman-Version: 2.1.13\r
  35 Precedence: list\r
  36 List-Id: "Use and development of the notmuch mail system."\r
  37         <notmuch.notmuchmail.org>\r
  38 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  39         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  40 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
  41 List-Post: <mailto:notmuch@notmuchmail.org>\r
  42 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  43 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  44         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  45 X-List-Received-Date: Fri, 16 Aug 2013 20:41:29 -0000\r
  46 \r
  47 When text/html parts include images as multipart/related and the\r
  48 text/plain alternative is used these images can be completely hidden\r
  49 with no easy way to access them or even find out that they are there.\r
  50 \r
  51 Make notmuch-show-insert-part-multipart/related add buttons for all\r
  52 parts, the first one visible the rest hidden.\r
  53 ---\r
  54  emacs/notmuch-show.el | 4 ++++\r
  55  1 file changed, 4 insertions(+)\r
  56 \r
  57 diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el\r
  58 index 82b70ba..20844f0 100644\r
  59 --- a/emacs/notmuch-show.el\r
  60 +++ b/emacs/notmuch-show.el\r
  61 @@ -621,6 +621,10 @@ message at DEPTH in the current thread."\r
  62  \r
  63      ;; Render the primary part.\r
  64      (notmuch-show-insert-bodypart msg (car inner-parts) depth)\r
  65 +    ;; Add hidden buttons for the rest\r
  66 +    (mapc (lambda (inner-part)\r
  67 +           (notmuch-show-insert-bodypart msg inner-part depth t))\r
  68 +         (cdr inner-parts))\r
  69  \r
  70      (when notmuch-show-indent-multipart\r
  71        (indent-rigidly start (point) 1)))\r
  72 -- \r
  73 1.8.1.4\r
  74 \r
  75 \r
  76 \r
  77 \r
  78 -- \r
  79         Istvan\r