Bug in emacs showing long threads
Scott Henson
scott at foolishpride.org
Sun Dec 19 19:27:05 PST 2010
I've been having problems with really long threads for a while when using
notmuch. When I click on them in emacs to display the content, I get "Lisp
nesting exceeds `max-lisp-eval-depth'" The problem up until now has been
these threads have always been ones that I couldn't share. I finally went
onto the fedora-devel list archives[0]. I was able to reproduce the issue
with emails that I can share. I've got a notmuch show --format=mbox of the
thread that caused the issue, which is available here[1]. The following is
the debugging output. Any other things I can provide to help track this
down? Thanks, this would be a big help.
(push (json-read) elements)
(while (not (char-equal ... 93)) (push (json-read) elements)
(json-skip-whitespace) (unless (char-equal ... 93) (if ... ... ...)))
(let (elements) (while (not ...) (push ... elements)
(json-skip-whitespace) (unless ... ...)) (json-advance) (apply
json-array-type (nreverse elements)))
json-read-array()
apply(json-read-array nil)
(if (functionp (car record)) (apply (car record) (cdr record)) (signal
(quote json-readtable-error) record))
(let ((record ...)) (if (functionp ...) (apply ... ...) (signal ...
record)))
(if (not (eq char :json-eof)) (let (...) (if ... ... ...)) (signal (quote
end-of-file) nil))
(let ((char ...)) (if (not ...) (let ... ...) (signal ... nil)))
json-read()
(cons (json-read) elements)
(setq elements (cons (json-read) elements))
(push (json-read) elements)
(while (not (char-equal ... 93)) (push (json-read) elements)
(json-skip-whitespace) (unless (char-equal ... 93) (if ... ... ...)))
(let (elements) (while (not ...) (push ... elements)
(json-skip-whitespace) (unless ... ...)) (json-advance) (apply
json-array-type (nreverse elements)))
json-read-array()
apply(json-read-array nil)
(if (functionp (car record)) (apply (car record) (cdr record)) (signal
(quote json-readtable-error) record))
(let ((record ...)) (if (functionp ...) (apply ... ...) (signal ...
record)))
(if (not (eq char :json-eof)) (let (...) (if ... ... ...)) (signal (quote
end-of-file) nil))
(let ((char ...)) (if (not ...) (let ... ...) (signal ... nil)))
json-read()
notmuch-query-get-threads(("'" "thread:00000000000193d0" "and ("
"tag:inbox and not tag:spam and not tag:delete" ")'"))
notmuch-show("thread:00000000000193d0" #<buffer
*notmuch-saved-search-inbox*> "tag:inbox and not tag:spam and not
tag:delete" "*F15 Feature - convert as man...")
notmuch-search-show-thread()
call-interactively(notmuch-search-show-thread nil nil)
[0] - http://lists.fedoraproject.org/pipermail/devel/
[1] - http://aiden.foolishpride.org/~shenson/bad.mbox
--
Scott Henson
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://notmuchmail.org/pipermail/notmuch/attachments/20101219/5e41cf13/attachment.html>
More information about the notmuch
mailing list