aa/4ff5b9d0a9ed0034dbc4be703d4a729ba54ba2

   1 Return-Path: <sjh@foolishpride.org>\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 B9161431FB6\r
   6         for <notmuch@notmuchmail.org>; Sun, 19 Dec 2010 19:27:11 -0800 (PST)\r
   7 X-Virus-Scanned: Debian amavisd-new at olra.theworths.org\r
   8 X-Spam-Flag: NO\r
   9 X-Spam-Score: -0.699\r
  10 X-Spam-Level: \r
  11 X-Spam-Status: No, score=-0.699 tagged_above=-999 required=5\r
  12         tests=[HTML_MESSAGE=0.001, RCVD_IN_DNSWL_LOW=-0.7] 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 dePCef+FezCW for <notmuch@notmuchmail.org>;\r
  16         Sun, 19 Dec 2010 19:27:10 -0800 (PST)\r
  17 Received: from mail-wy0-f181.google.com (mail-wy0-f181.google.com\r
  18         [74.125.82.181])\r
  19         by olra.theworths.org (Postfix) with ESMTP id 76B41431FB5\r
  20         for <notmuch@notmuchmail.org>; Sun, 19 Dec 2010 19:27:10 -0800 (PST)\r
  21 Received: by wyf22 with SMTP id 22so2665845wyf.26\r
  22         for <notmuch@notmuchmail.org>; Sun, 19 Dec 2010 19:27:06 -0800 (PST)\r
  23 MIME-Version: 1.0\r
  24 Received: by 10.216.188.67 with SMTP id z45mr4245024wem.7.1292815625491; Sun,\r
  25         19 Dec 2010 19:27:05 -0800 (PST)\r
  26 Sender: sjh@foolishpride.org\r
  27 Received: by 10.216.20.75 with HTTP; Sun, 19 Dec 2010 19:27:05 -0800 (PST)\r
  28 Date: Sun, 19 Dec 2010 22:27:05 -0500\r
  29 X-Google-Sender-Auth: T7eD9E3FHh7BSUhuWD2aMHRUZJ0\r
  30 Message-ID: <AANLkTinEC7cp_53GY0Pa=++tS7MYfOJScz2KyQzz5UrS@mail.gmail.com>\r
  31 Subject: Bug in emacs showing long threads\r
  32 From: Scott Henson <scott@foolishpride.org>\r
  33 To: notmuch <notmuch@notmuchmail.org>\r
  34 Content-Type: multipart/alternative; boundary=0016368319501e177a0497cf1827\r
  35 X-BeenThere: notmuch@notmuchmail.org\r
  36 X-Mailman-Version: 2.1.13\r
  37 Precedence: list\r
  38 List-Id: "Use and development of the notmuch mail system."\r
  39         <notmuch.notmuchmail.org>\r
  40 List-Unsubscribe: <http://notmuchmail.org/mailman/options/notmuch>,\r
  41         <mailto:notmuch-request@notmuchmail.org?subject=unsubscribe>\r
  42 List-Archive: <http://notmuchmail.org/pipermail/notmuch>\r
  43 List-Post: <mailto:notmuch@notmuchmail.org>\r
  44 List-Help: <mailto:notmuch-request@notmuchmail.org?subject=help>\r
  45 List-Subscribe: <http://notmuchmail.org/mailman/listinfo/notmuch>,\r
  46         <mailto:notmuch-request@notmuchmail.org?subject=subscribe>\r
  47 X-List-Received-Date: Mon, 20 Dec 2010 03:27:11 -0000\r
  48 \r
  49 --0016368319501e177a0497cf1827\r
  50 Content-Type: text/plain; charset=ISO-8859-1\r
  51 \r
  52 I've been having problems with really long threads for a while when using\r
  53 notmuch.  When I click on them in emacs to display the content, I get "Lisp\r
  54 nesting exceeds `max-lisp-eval-depth'"  The problem up until now has been\r
  55 these threads have always been ones that I couldn't share.  I finally went\r
  56 onto the fedora-devel list archives[0].  I was able to reproduce the issue\r
  57 with emails that I can share.  I've got a notmuch show --format=mbox of the\r
  58 thread that caused the issue, which is available here[1].  The following is\r
  59 the debugging output.  Any other things I can provide to help track this\r
  60 down?  Thanks, this would be a big help.\r
  61 \r
  62   (push (json-read) elements)\r
  63   (while (not (char-equal ... 93)) (push (json-read) elements)\r
  64 (json-skip-whitespace) (unless (char-equal ... 93) (if ... ... ...)))\r
  65   (let (elements) (while (not ...) (push ... elements)\r
  66 (json-skip-whitespace) (unless ... ...)) (json-advance) (apply\r
  67 json-array-type (nreverse elements)))\r
  68   json-read-array()\r
  69   apply(json-read-array nil)\r
  70   (if (functionp (car record)) (apply (car record) (cdr record)) (signal\r
  71 (quote json-readtable-error) record))\r
  72   (let ((record ...)) (if (functionp ...) (apply ... ...) (signal ...\r
  73 record)))\r
  74   (if (not (eq char :json-eof)) (let (...) (if ... ... ...)) (signal (quote\r
  75 end-of-file) nil))\r
  76   (let ((char ...)) (if (not ...) (let ... ...) (signal ... nil)))\r
  77   json-read()\r
  78   (cons (json-read) elements)\r
  79   (setq elements (cons (json-read) elements))\r
  80   (push (json-read) elements)\r
  81   (while (not (char-equal ... 93)) (push (json-read) elements)\r
  82 (json-skip-whitespace) (unless (char-equal ... 93) (if ... ... ...)))\r
  83   (let (elements) (while (not ...) (push ... elements)\r
  84 (json-skip-whitespace) (unless ... ...)) (json-advance) (apply\r
  85 json-array-type (nreverse elements)))\r
  86   json-read-array()\r
  87   apply(json-read-array nil)\r
  88   (if (functionp (car record)) (apply (car record) (cdr record)) (signal\r
  89 (quote json-readtable-error) record))\r
  90   (let ((record ...)) (if (functionp ...) (apply ... ...) (signal ...\r
  91 record)))\r
  92   (if (not (eq char :json-eof)) (let (...) (if ... ... ...)) (signal (quote\r
  93 end-of-file) nil))\r
  94   (let ((char ...)) (if (not ...) (let ... ...) (signal ... nil)))\r
  95   json-read()\r
  96   notmuch-query-get-threads(("'" "thread:00000000000193d0" "and ("\r
  97 "tag:inbox and not tag:spam and not tag:delete" ")'"))\r
  98   notmuch-show("thread:00000000000193d0" #<buffer\r
  99 *notmuch-saved-search-inbox*> "tag:inbox and not tag:spam and not\r
 100 tag:delete" "*F15 Feature - convert as man...")\r
 101   notmuch-search-show-thread()\r
 102   call-interactively(notmuch-search-show-thread nil nil)\r
 103 \r
 104 [0] - http://lists.fedoraproject.org/pipermail/devel/\r
 105 [1] - http://aiden.foolishpride.org/~shenson/bad.mbox\r
 106 \r
 107 -- \r
 108 Scott Henson\r
 109 \r
 110 --0016368319501e177a0497cf1827\r
 111 Content-Type: text/html; charset=ISO-8859-1\r
 112 Content-Transfer-Encoding: quoted-printable\r
 113 \r
 114 I&#39;ve been having problems with really long threads for a while when usi=\r
 115 ng notmuch. =A0When I click on them in emacs to display the content, I get =\r
 116 &quot;Lisp nesting exceeds `max-lisp-eval-depth&#39;&quot; =A0The problem u=\r
 117 p until now has been these threads have always been ones that I couldn&#39;=\r
 118 t share. =A0I finally went onto the fedora-devel list archives[0]. =A0I was=\r
 119  able to reproduce the issue with emails that I can share. =A0I&#39;ve got =\r
 120 a notmuch show --format=3Dmbox of the thread that caused the issue, which i=\r
 121 s available here[1]. =A0The following is the debugging output. =A0Any other=\r
 122  things I can provide to help track this down? =A0Thanks, this would be a b=\r
 123 ig help.<div>\r
 124 <br></div><div><div>=A0=A0(push (json-read) elements)</div><div>=A0=A0(whil=\r
 125 e (not (char-equal ... 93)) (push (json-read) elements) (json-skip-whitespa=\r
 126 ce) (unless (char-equal ... 93) (if ... ... ...)))</div><div>=A0=A0(let (el=\r
 127 ements) (while (not ...) (push ... elements) (json-skip-whitespace) (unless=\r
 128  ... ...)) (json-advance) (apply json-array-type (nreverse elements)))</div=\r
 129 >\r
 130 <div>=A0=A0json-read-array()</div><div>=A0=A0apply(json-read-array nil)</di=\r
 131 v><div>=A0=A0(if (functionp (car record)) (apply (car record) (cdr record))=\r
 132  (signal (quote json-readtable-error) record))</div><div>=A0=A0(let ((recor=\r
 133 d ...)) (if (functionp ...) (apply ... ...) (signal ... record)))</div>\r
 134 <div>=A0=A0(if (not (eq char :json-eof)) (let (...) (if ... ... ...)) (sign=\r
 135 al (quote end-of-file) nil))</div><div>=A0=A0(let ((char ...)) (if (not ...=\r
 136 ) (let ... ...) (signal ... nil)))</div><div>=A0=A0json-read()</div><div>=\r
 137 =A0=A0(cons (json-read) elements)</div>\r
 138 <div>=A0=A0(setq elements (cons (json-read) elements))</div><div>=A0=A0(pus=\r
 139 h (json-read) elements)</div><div>=A0=A0(while (not (char-equal ... 93)) (p=\r
 140 ush (json-read) elements) (json-skip-whitespace) (unless (char-equal ... 93=\r
 141 ) (if ... ... ...)))</div>\r
 142 <div>=A0=A0(let (elements) (while (not ...) (push ... elements) (json-skip-=\r
 143 whitespace) (unless ... ...)) (json-advance) (apply json-array-type (nrever=\r
 144 se elements)))</div><div>=A0=A0json-read-array()</div><div>=A0=A0apply(json=\r
 145 -read-array nil)</div>\r
 146 <div>=A0=A0(if (functionp (car record)) (apply (car record) (cdr record)) (=\r
 147 signal (quote json-readtable-error) record))</div><div>=A0=A0(let ((record =\r
 148 ...)) (if (functionp ...) (apply ... ...) (signal ... record)))</div><div>=\r
 149 =A0=A0(if (not (eq char :json-eof)) (let (...) (if ... ... ...)) (signal (q=\r
 150 uote end-of-file) nil))</div>\r
 151 <div>=A0=A0(let ((char ...)) (if (not ...) (let ... ...) (signal ... nil)))=\r
 152 </div><div>=A0=A0json-read()</div><div>=A0=A0notmuch-query-get-threads((&qu=\r
 153 ot;&#39;&quot; &quot;thread:00000000000193d0&quot; &quot;and (&quot; &quot;=\r
 154 tag:inbox and not tag:spam and not tag:delete&quot; &quot;)&#39;&quot;))</d=\r
 155 iv>\r
 156 <div>=A0=A0notmuch-show(&quot;thread:00000000000193d0&quot; #&lt;buffer *no=\r
 157 tmuch-saved-search-inbox*&gt; &quot;tag:inbox and not tag:spam and not tag:=\r
 158 delete&quot; &quot;*F15 Feature - convert as man...&quot;)</div><div>=A0=A0=\r
 159 notmuch-search-show-thread()</div>\r
 160 <div>=A0=A0call-interactively(notmuch-search-show-thread nil nil)</div><div=\r
 161 ><br></div><div>[0] -=A0<a href=3D"http://lists.fedoraproject.org/pipermail=\r
 162 /devel/">http://lists.fedoraproject.org/pipermail/devel/</a></div><div>[1] =\r
 163 -=A0<a href=3D"http://aiden.foolishpride.org/~shenson/bad.mbox">http://aide=\r
 164 n.foolishpride.org/~shenson/bad.mbox</a></div>\r
 165 <div><br></div><div>-- <br>Scott Henson<br>\r
 166 </div></div>\r
 167 \r
 168 --0016368319501e177a0497cf1827--\r