Backtrace with latest crypto branch

Sun Mar 13 14:00:34 PDT 2011

Hi David,

On Wed, 09 Mar 2011 17:20:05 -0400, David Bremner <bremner at unb.ca> wrote:
> On Wed, 09 Mar 2011 22:14:55 +0100, Xavier Maillard <xma at gnu.org> wrote:
> > Hi,
> > 
> > No problem, Cc'ing accordingly.
> > 
> > Hope that'll help in debugging this issue.
> > 
> 
> Can one of you post the backtrace?

Here it is:

Debugger entered--Lisp error: (wrong-type-argument char-or-string-p ((:content ((:content "Hey, folks.  I just wanted to give all the crypto early adopters a heads
up that I just changed the crypto customization variable name in my
crypto branch to be:

  notmuch-process-crypto-mime

Daniel Gillmor has been doing a lot of great work with GMIME upstream to
include support for handling s/mime parts with the same crypto context.
When this work gets finished, pgp/mime and s/mime parts will both be
processed with the same crypto hooks.  Looking ahead, I thought the
previous variable name (notmuch-process-pgpmime) was overly specific.
And I wanted to get this change in before cworth's rumored imminent next
release push (waiting with bated breath!).

jamie.

!DSPAM:1,4d72d0f035413102713680!
" :content-type "text/plain" :id 3) (:content-type "application/pgp-signature" :id 4)) :content-type "multipart/signed" :id 2) (:content "_______________________________________________
notmuch mailing list
notmuch at notmuchmail.org
http://notmuchmail.org/mailman/listinfo/notmuch

!DSPAM:1,4d72d0f035413102713680!
" :content-type "text/plain" :id 5)))
  insert(((:content (... ...) :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)))
  (progn (insert content) (let (...) (set-buffer display-buffer) (if ... ... nil)))
  (unwind-protect (progn (insert content) (let ... ... ...)) (and (buffer-name temp-buffer) (kill-buffer temp-buffer)))
  (save-current-buffer (set-buffer temp-buffer) (unwind-protect (progn ... ...) (and ... ...)))
  (with-current-buffer temp-buffer (unwind-protect (progn ... ...) (and ... ...)))
  (let ((temp-buffer ...)) (with-current-buffer temp-buffer (unwind-protect ... ...)))
  (with-temp-buffer (insert content) (let (...) (set-buffer display-buffer) (if ... ... nil)))
  (let ((display-buffer ...)) (with-temp-buffer (insert content) (let ... ... ...)))
  notmuch-show-mm-display-part-inline((:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (:content ((:content ... :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)) :content-type "multipart/mixed" :id 1) "multipart/mixed" ((:content (... ...) :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)))
  (if content (notmuch-show-mm-display-part-inline msg part content-type content))
  (let ((content ...)) (if content (notmuch-show-mm-display-part-inline msg part content-type content)))
  notmuch-show-insert-part-*/*((:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (:content ((:content ... :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)) :content-type "multipart/mixed" :id 1) "multipart/mixed" 1 0 "multipart/mixed")
  funcall(notmuch-show-insert-part-*/* (:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (:content ((:content ... :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)) :content-type "multipart/mixed" :id 1) "multipart/mixed" 1 0 "multipart/mixed")
  (not (funcall (car handlers) msg part content-type nth depth declared-type))
  (and handlers (not (funcall ... msg part content-type nth depth declared-type)))
  (while (and handlers (not ...)) (setq handlers (cdr handlers)))
  (let ((handlers ...)) (while (and handlers ...) (setq handlers ...)))
  notmuch-show-insert-bodypart-internal((:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (:content ((:content ... :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)) :content-type "multipart/mixed" :id 1) "multipart/mixed" 1 0 "multipart/mixed")
  (let ((content-type ...) (nth ...)) (notmuch-show-insert-bodypart-internal msg part content-type nth depth content-type))
  notmuch-show-insert-bodypart((:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (:content ((:content ... :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)) :content-type "multipart/mixed" :id 1) 0)
  (lambda (part) (notmuch-show-insert-bodypart msg part depth))((:content ((:content ... :content-type "multipart/signed" :id 2) (:content "_______________________________________________\nnotmuch mailing list\nnotmuch at notmuchmail.org\nhttp://notmuchmail.org/mailman/listinfo/notmuch\n\n\n!DSPAM:1,4d72d0f035413102713680!\n" :content-type "text/plain" :id 5)) :content-type "multipart/mixed" :id 1))
  mapc((lambda (part) (notmuch-show-insert-bodypart msg part depth)) ((:content (... ...) :content-type "multipart/mixed" :id 1)))
  notmuch-show-insert-body((:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") ((:content (... ...) :content-type "multipart/mixed" :id 1)) 0)
  (let* ((headers ...) message-start message-end content-start content-end headers-start headers-end body-start body-end (headers-invis-spec ...) (message-invis-spec ...) (bare-subject ...)) (when (eq buffer-invisibility-spec t) (setq buffer-invisibility-spec nil)) (setq message-start (point-marker)) (notmuch-show-insert-headerline headers (or ... ...) (plist-get msg :tags) depth) (setq content-start (point-marker)) (notmuch-show-insert-headers headers) (insert "\n") (save-excursion (goto-char content-start) (when ... ...) (setq headers-start ...)) (setq headers-end (point-marker)) (setq notmuch-show-previous-subject bare-subject) (setq body-start (point-marker)) (notmuch-show-insert-body msg (plist-get msg :body) depth) (if (not ...) (insert "\n")) (setq body-end (point-marker)) (setq content-end (point-marker)) (indent-rigidly content-start content-end depth) (setq message-end (point-max-marker)) (put-text-property message-start message-end :notmuch-message-extent (cons message-start message-end)) (plist-put msg :headers-invis-spec headers-invis-spec) (overlay-put (make-overlay headers-start headers-end) (quote invisible) headers-invis-spec) (plist-put msg :message-invis-spec message-invis-spec) (overlay-put (make-overlay body-start body-end) (quote invisible) message-invis-spec) (notmuch-show-set-message-properties msg) (notmuch-show-headers-visible msg notmuch-message-headers-visible) (notmuch-show-message-visible msg (plist-get msg :match)))
  notmuch-show-insert-msg((:body ((:content ... :content-type "multipart/mixed" :id 1)) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") 0)
  (let ((msg ...) (replies ...)) (notmuch-show-insert-msg msg depth) (notmuch-show-insert-thread replies (1+ depth)))
  notmuch-show-insert-tree(((:body (...) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") ((... ...))) 0)
  (lambda (tree) (notmuch-show-insert-tree tree depth))(((:body (...) :headers (:Date "Sat, 05 Mar 2011 16:10:06 -0800" :Bcc "" :Cc "" :To "Notmuch Mail <notmuch at notmuchmail.org>" :From "Jameson Rollins <jrollins at finestructure.net>" :Subject "change of crypto mime customization variable") :tags ("notmuch" "replied") :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") ((... ...))))
  mapc((lambda (tree) (notmuch-show-insert-tree tree depth)) (((:body ... :headers ... :tags ... :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (...))))
  notmuch-show-insert-thread((((:body ... :headers ... :tags ... :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (...))) 0)
  (lambda (thread) (notmuch-show-insert-thread thread 0))((((:body ... :headers ... :tags ... :date_relative "Yest. 01:10" :timestamp 1299370206.0 :filename "/home/xavier/im.maillard/INBOX/cur/1299485584_0.23858.kcals,U=129150,FMD5=7e33429f656f1e6e9d79b29c3f82c57e:2,RS" :match t :id "87ipvx9kip.fsf at servo.finestructure.net") (...))))
  mapc((lambda (thread) (notmuch-show-insert-thread thread 0)) (((... ...))))
  notmuch-show-insert-forest((((... ...))))
  (let* ((basic-args ...) (args ...)) (notmuch-show-insert-forest (notmuch-query-get-threads args)) (when (and ... query-context) (notmuch-show-insert-forest ...)))
  (save-excursion (let* (... ...) (notmuch-show-insert-forest ...) (when ... ...)) (goto-address-mode t) (visual-line-mode t) (run-hooks (quote notmuch-show-hook)))
  (let ((buffer ...) (inhibit-read-only t)) (switch-to-buffer buffer) (notmuch-show-mode) (set (make-local-variable ...) parent-buffer) (erase-buffer) (goto-char (point-min)) (save-excursion (let* ... ... ...) (goto-address-mode t) (visual-line-mode t) (run-hooks ...)) (if (not ...) (notmuch-show-next-open-message)) (setq header-line-format (notmuch-show-strip-re ...)) (notmuch-show-mark-read))
  notmuch-show("thread:000000000000d2c9" #<buffer *notmuch-saved-search-notmuch*> "tag:notmuch  and not tag:deleted" "*change of crypto mime custom...")
  (if (> (length thread-id) 0) (notmuch-show thread-id (current-buffer) notmuch-search-query-string (if ... "[No Subject]" ...)) (error "End of search results"))
  (let ((thread-id ...) (subject ...)) (if (> ... 0) (notmuch-show thread-id ... notmuch-search-query-string ...) (error "End of search results")))
  notmuch-search-show-thread()
  call-interactively(notmuch-search-show-thread nil nil)