Re: bug#6214: 23.1; json-read-string crashes emacs with long string
[notmuch-archives.git] / 07 / b36e7e0e3d2750b65284d8711ec01d28f64f55
1 Return-Path: <aneesh.kumar@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 2E250431FAE\r
6         for <notmuch@notmuchmail.org>; Tue,  1 Dec 2009 08:16:03 -0800 (PST)\r
7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
8 Received: from olra.theworths.org ([127.0.0.1])\r
9         by localhost (olra.theworths.org [127.0.0.1]) (amavisd-new, port 10024)\r
10         with ESMTP id glPDM1p8G5VE for <notmuch@notmuchmail.org>;\r
11         Tue,  1 Dec 2009 08:16:01 -0800 (PST)\r
12 Received: from e23smtp09.au.ibm.com (e23smtp09.au.ibm.com [202.81.31.142])\r
13         by olra.theworths.org (Postfix) with ESMTP id 240C6431FBC\r
14         for <notmuch@notmuchmail.org>; Tue,  1 Dec 2009 08:16:00 -0800 (PST)\r
15 Received: from d23relay03.au.ibm.com (d23relay03.au.ibm.com [202.81.31.245])\r
16         by e23smtp09.au.ibm.com (8.14.3/8.13.1) with ESMTP id nB23G0H7001753\r
17         for <notmuch@notmuchmail.org>; Wed, 2 Dec 2009 14:16:00 +1100\r
18 Received: from d23av04.au.ibm.com (d23av04.au.ibm.com [9.190.235.139])\r
19         by d23relay03.au.ibm.com (8.13.8/8.13.8/NCO v10.0) with ESMTP id\r
20         nB1GFxd91020004\r
21         for <notmuch@notmuchmail.org>; Wed, 2 Dec 2009 03:15:59 +1100\r
22 Received: from d23av04.au.ibm.com (loopback [127.0.0.1])\r
23         by d23av04.au.ibm.com (8.14.3/8.13.1/NCO v10.0 AVout) with ESMTP id\r
24         nB1GFx13008693\r
25         for <notmuch@notmuchmail.org>; Wed, 2 Dec 2009 03:15:59 +1100\r
26 Received: from localhost.localdomain ([9.124.215.21])\r
27         by d23av04.au.ibm.com (8.14.3/8.13.1/NCO v10.0 AVin) with ESMTP id\r
28         nB1GFr3h008630; Wed, 2 Dec 2009 03:15:57 +1100\r
29 From: aneesh.kumar@gmail.com\r
30 To: cworth@cworth.org, aneesh.kumar@linux.vnet.ibm.com\r
31 Date: Tue,  1 Dec 2009 21:45:48 +0530\r
32 Message-Id: <1259684149-9574-2-git-send-email-aneesh.kumar@gmail.com>\r
33 X-Mailer: git-send-email 1.6.5.2.74.g610f9\r
34 In-Reply-To: <1259684149-9574-1-git-send-email-aneesh.kumar@gmail.com>\r
35 References: <1259684149-9574-1-git-send-email-aneesh.kumar@gmail.com>\r
36 X-Mailman-Approved-At: Tue, 01 Dec 2009 08:25:29 -0800\r
37 Cc: "Aneesh Kumar K.V" <aneesh.kumar@gmail.com>, notmuch@notmuchmail.org\r
38 Subject: [notmuch] [PATCH 2/3] notmuch.el: Fix the message summary button to\r
39         be active even on first column\r
40 X-BeenThere: notmuch@notmuchmail.org\r
41 X-Mailman-Version: 2.1.12\r
42 Precedence: list\r
43 List-Id: "Use and development of the notmuch mail system."\r
44         <notmuch.notmuchmail.org>\r
45 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
46         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
47 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
48 List-Post: <mailto:notmuch@notmuchmail.org>\r
49 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
50 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
51         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
52 X-List-Received-Date: Tue, 01 Dec 2009 16:16:03 -0000\r
53 \r
54 From: Aneesh Kumar K.V <aneesh.kumar@gmail.com>\r
55 \r
56 This make we have button activated even on the first column of\r
57 the message summary line. Remove the inverse video overlay\r
58 on the message summary line.\r
59 \r
60 Signed-off-by: Aneesh Kumar K.V <aneesh.kumar@gmail.com>\r
61 ---\r
62  notmuch.el |   15 +++++++--------\r
63  1 files changed, 7 insertions(+), 8 deletions(-)\r
64 \r
65 diff --git a/notmuch.el b/notmuch.el\r
66 index c1e8257..6a0c119 100644\r
67 --- a/notmuch.el\r
68 +++ b/notmuch.el\r
69 @@ -575,7 +575,7 @@ which this thread was originally shown."\r
70    :supertype 'notmuch-button-invisibility-toggle-type)\r
71  (define-button-type 'notmuch-button-body-toggle-type \r
72    'help-echo "mouse-1, RET: Show message"\r
73 -  'face '(:inverse-video . t)\r
74 +  'face 'message-header-other\r
75    :supertype 'notmuch-button-invisibility-toggle-type )\r
76  \r
77  (defun notmuch-show-markup-citations-region (beg end depth)\r
78 @@ -721,13 +721,7 @@ which this thread was originally shown."\r
79    (forward-line)\r
80    (let ((beg (point-marker))\r
81          (btn nil))\r
82 -    (end-of-line)\r
83 -    ; Inverse video for subject\r
84 -    (let ((message-overlay (make-overlay beg (point))))\r
85 -      (overlay-put message-overlay 'face '(:inverse-video t))\r
86 -      (setq btn (make-button (line-beginning-position)\r
87 -                            (overlay-end message-overlay)\r
88 -                            :type 'notmuch-button-body-toggle-type)))\r
89 +\r
90      (forward-line 1)\r
91      (end-of-line)\r
92      (let ((beg-hidden (point-marker)))\r
93 @@ -747,7 +741,12 @@ which this thread was originally shown."\r
94            (overlay-put (make-overlay beg-hidden end)\r
95                         'invisible invis-spec)\r
96            (goto-char beg)\r
97 +         ;; mail summary\r
98 +         (setq btn (make-button (line-beginning-position)\r
99 +                               (line-end-position)\r
100 +                               :type 'notmuch-button-body-toggle-type))\r
101            (forward-line)\r
102 +         ;; subject line\r
103            (make-button (line-beginning-position) (line-end-position)\r
104                          'invisibility-spec (cons invis-spec t)\r
105                          :type 'notmuch-button-headers-toggle-type))\r
106 -- \r
107 1.6.5.2.74.g610f9\r
108 \r