[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Error viewing (usually forwarded) messages
On Tue, 10 Jul 2012 19:55:39 +0900, Kazuhiro Ito spake thus:
Oh, sorry, my very bad, I totally missed this message.
> > Since a few weeks, I cannot read (nor save) some — and especially no
> > forwarded – emails anymore. Copy is local, brought by offlineimap. Backtrace
> > goes :
> Please remove byte-code from your backtrace by redefining relating
> functions or removing related .elc files, then see below links, and
> re-get backtrace.
> http://thread.gmane.org/gmane.mail.wanderlust.general.japanese/7936/focus=7950
Having redefined wl-message-buffer-display as mentionned in the thread, in .wl, I get :
1. Unknown function "quit" when reading any message for the first time, and
then trying to read it again (from cache I guess) works fine. Not a big
problem, just mentionning.
2. This backtrace for a forwarded message I can't read :
Debugger entered--Lisp error: (wrong-type-argument number-or-marker-p nil)
#[(child) "\306 \"\307\n\236A\203@ mapcar(#[(child) "\306 \"\307\n\236A\203@ il "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]))
mime-display-multipart/alternative([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] ((body-presentation-method . mime-display-multipart/alternative) (body . visible) (encoding . "7bit") ("boundary" . "------------000809060609010307070507") (subtype . alternative) (type . multipart) (entity-button . invisible) (header . visible) (major-mode . wl-original-message-mode)))
mime-display-entity([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] nil ((entity-button . invisible) (header . visible) (major-mode . wl-original-message-mode)) #<buffer *WL:Message*<6>>)
ad-Orig-mime-display-message([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] #<buffer *WL:Message*<6>> nil (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggl
e-disp-summary) (68 . wl-message-delete-current-part)) wl-original-message-mode nil)
mime-display-message([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] #<buffer *WL:Message*<6>> nil (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggle-disp-s
ummary) (68 . wl-message-delete-current-part)) wl-original-message-mode)
(let ((elmo-message-displaying t) (default-mime-charset ...)) (mime-display-message entity preview-buffer nil keymap original-major-mode))
(lambda (entity preview-buffer &optional original-major-mode keymap) (let (... ...) (mime-display-message entity preview-buffer nil keymap original-major-mode)))([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] #<buffer *WL:Message*<6>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-mes
sage-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part)))
apply((lambda (entity preview-buffer &optional original-major-mode keymap) (let (... ...) (mime-display-message entity preview-buffer nil keymap original-major-mode))) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> (... ... ...) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #1 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #1 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] #<buffer *WL:Message*<6>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-d
own) (119 . wl-draft) (3 keymap ...) (108 . wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part))))
luna-call-next-method()
luna-apply-generic([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] elmo-mime-entity-display [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Messag
e*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] #<buffer *WL:Message*<6>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part)))
elmo-mime-entity-display([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] #<buffer *WL:Message*<6>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 .
wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part)))
(if (wl-message-mime-analysis-p display-type) (elmo-mime-entity-display entity (current-buffer) (quote wl-original-message-mode) (wl-message-define-keymap)) (let* (... ...) (elmo-mime-entity-display-as-is entity ... ... ...) (let ... ...)))
(let ((default-mime-charset wl-mime-charset) (elmo-mime-charset wl-mime-charset) (wl-message-buffer-require-all-header ...)) (if (wl-message-mime-analysis-p display-type) (elmo-mime-entity-display entity ... ... ...) (let* ... ... ...)) (setq wl-message-buffer-cur-display-type display-type wl-message-buffer-mime-entity entity) (run-hooks (quote wl-message-display-internal-hook)) (setq buffer-read-only t))
wl-message-display-internal([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ((type . multipart) (subtype . alternative) ("boundary" . "------------000809060609010307070507")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "8bit" ... nil #<buffer *Original* *WL:Message*<6>> 4804 4896 4897 5965 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<6>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 6005 6087 6088 71491 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<6>> 1 4719 4720 71533 nil] mime-partial-header)
(save-current-buffer (set-buffer hit) (when (or force-reload ... ... ...) (setq entity ...)) (unless entity (error "Cannot display message %s/%s" fname number)) (wl-message-display-internal entity display-type))
(with-current-buffer hit (when (or force-reload ... ... ...) (setq entity ...)) (unless entity (error "Cannot display message %s/%s" fname number)) (wl-message-display-internal entity display-type))
(progn (with-current-buffer hit (when ... ...) (unless entity ...) (wl-message-display-internal entity display-type)) (quit (wl-message-buffer-cache-delete) (error "Display message %s/%s is quitted" fname number)))
(if (or force-reload redisplay) (progn (with-current-buffer hit ... ... ...) (quit ... ...)))
(when (or force-reload redisplay) (with-current-buffer hit (when ... ...) (unless entity ...) (wl-message-display-internal entity display-type)) (quit (wl-message-buffer-cache-delete) (error "Display message %s/%s is quitted" fname number)))
(let* ((msg-id ...) (fname ...) (hit ...) (redisplay nil) entity) (when (and hit ...) (wl-message-buffer-cache-delete ...) (setq hit nil)) (if hit (progn ... ...) (setq hit ...) (setq redisplay t)) (when (or force-reload redisplay) (with-current-buffer hit ... ... ...) (quit ... ...)) hit)
wl-message-buffer-display([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".ENS/INBOX" "." "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" [modb-standard [0 0 0 0 0 0 0] "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" (41) t x-ctext (19558 19901 20234 20693 20811 20812 20813) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext ((19558 . "1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20813 . "1348253642.2599_1.villian") (19901 . "1347313176_0.9024.villian,U=34982,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20234 . "1347692371_0.15775.villian,U=35326,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20693 . "1348084362_0.21216.villian,U=35861,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20811 . "1348252780_0.31073.villian,U=36083,FMD5=7e
33429f656f1e6e9d79b29c3f82c57e") (20812 . "1348253200_0.31073.villian,U=36084,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1347692371_0\.15775\.villian\,U=35326\,FMD5=7e33429f656f1e6e9d79b29c3f82c57e 0 0 0 0 0 0 0 0 0 ...] 20813 "/home/villiam/Mail/ENS/INBOX" nil nil ("1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")] 20813 mime-partial-header nil)
(setq wl-message-buffer (wl-message-buffer-display folder number display-type force-reload))
(let* ((default-mime-charset wl-mime-charset) (buffer-read-only nil) (summary-buf ...) message-buf entity summary-win flags) (setq buffer-read-only nil) (setq wl-message-buffer (wl-message-buffer-display folder number display-type force-reload)) (setq message-buf wl-message-buffer) (wl-message-select-buffer wl-message-buffer) (set-buffer message-buf) (wl-deactivate-region) (make-local-variable (quote truncate-partial-width-windows)) (setq truncate-partial-width-windows nil) (setq truncate-lines wl-message-truncate-lines) (setq buffer-read-only nil) (setq wl-message-buffer-cur-summary-buffer summary-buf) (setq wl-message-buffer-cur-folder (elmo-folder-name-internal folder)) (setq wl-message-buffer-cur-number number) (setq wl-message-buffer-flag-indicator (wl-message-flag-indicator ...)) (wl-line-formatter-setup wl-message-buffer-mode-line-formatter wl-message-mode-line-format wl-message-mode-line-format-spec-alist) (setq mode-line-buffer-identification (funcall wl-message-bu
ffer-mode-line-formatter)) (ignore-errors (wl-message-narrow-to-page)) (goto-char (point-min)) (when (re-search-forward "^$" nil t) (wl-message-add-buttons-to-header ... ...) (wl-message-add-buttons-to-body ... ...)) (when (and wl-message-use-header-narrowing ...) (wl-message-header-narrowing)) (goto-char (point-min)) (ignore-errors (run-hooks ...)) (set-buffer-modified-p nil) (setq buffer-read-only t) (set-buffer summary-buf) (setq summary-win (get-buffer-window summary-buf)) (if (window-live-p summary-win) (select-window summary-win)))
wl-message-redisplay([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".ENS/INBOX" "." "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" [modb-standard [0 0 0 0 0 0 0] "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" (41) t x-ctext (19558 19901 20234 20693 20811 20812 20813) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext ((19558 . "1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20813 . "1348253642.2599_1.villian") (19901 . "1347313176_0.9024.villian,U=34982,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20234 . "1347692371_0.15775.villian,U=35326,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20693 . "1348084362_0.21216.villian,U=35861,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20811 . "1348252780_0.31073.villian,U=36083,FMD5=7e33429
f656f1e6e9d79b29c3f82c57e") (20812 . "1348253200_0.31073.villian,U=36084,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1347692371_0\.15775\.villian\,U=35326\,FMD5=7e33429f656f1e6e9d79b29c3f82c57e 0 0 0 0 0 0 0 0 0 ...] 20813 "/home/villiam/Mail/ENS/INBOX" nil nil ("1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")] 20813 mime-partial-header nil)
(progn (setq wl-summary-buffer-disp-msg t) (wl-summary-push-message wl-summary-buffer-current-msg) (if (and ... ...) (if ... ...)) (setq wl-current-summary-buffer (current-buffer)) (wl-message-redisplay folder num (wl-message-make-display-type ... ...) (or force-reload ...)) (when (elmo-message-use-cache-p folder num) (elmo-message-set-cached folder num t)) (ignore-errors (if ... ... ... ... ...)) (setq wl-summary-buffer-current-msg num) (when wl-summary-recenter (recenter ...) (if ... ...)) (wl-highlight-summary-displaying) (wl-message-buffer-prefetch-next folder num (min ... ...) (current-buffer) wl-summary-buffer-mime-charset) (run-hooks (quote wl-summary-redisplay-hook)))
(if num (progn (setq wl-summary-buffer-disp-msg t) (wl-summary-push-message wl-summary-buffer-current-msg) (if ... ...) (setq wl-current-summary-buffer ...) (wl-message-redisplay folder num ... ...) (when ... ...) (ignore-errors ...) (setq wl-summary-buffer-current-msg num) (when wl-summary-recenter ... ...) (wl-highlight-summary-displaying) (wl-message-buffer-prefetch-next folder num ... ... wl-summary-buffer-mime-charset) (run-hooks ...)) (message "No message to display."))
(let* ((folder ...) (num ...) (wl-mime-charset wl-summary-buffer-mime-charset) (default-mime-charset wl-summary-buffer-mime-charset) fld-buf fld-win thr-entity (elmo-message-fetch-confirm ...)) (if (and wl-thread-open-reading-thread ... ... ...) (wl-thread-force-open)) (if num (progn ... ... ... ... ... ... ... ... ... ... ... ...) (message "No message to display.")))
wl-summary-redisplay-internal([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".ENS/INBOX" "." "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" [modb-standard [0 0 0 0 0 0 0] "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" (41) t x-ctext (19558 19901 20234 20693 20811 20812 20813) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext ((19558 . "1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20813 . "1348253642.2599_1.villian") (19901 . "1347313176_0.9024.villian,U=34982,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20234 . "1347692371_0.15775.villian,U=35326,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20693 . "1348084362_0.21216.villian,U=35861,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20811 . "1348252780_0.31073.villian,U=36083,FMD
5=7e33429f656f1e6e9d79b29c3f82c57e") (20812 . "1348253200_0.31073.villian,U=36084,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1347692371_0\.15775\.villian\,U=35326\,FMD5=7e33429f656f1e6e9d79b29c3f82c57e 0 0 0 0 0 0 0 0 0 ...] 20813 "/home/villiam/Mail/ENS/INBOX" nil nil ("1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")] 20813)
(if (and (string= ... ...) (eq number ...)) (progn (set-buffer wl-message-buffer) t) (wl-summary-redisplay-internal folder number) (when (buffer-live-p wl-message-buffer) (set-buffer wl-message-buffer)) nil)
(let ((folder wl-summary-buffer-elmo-folder) (number ...) cur-folder cur-number message-last-pos) (when (buffer-live-p wl-message-buffer) (save-window-excursion ... ... ... ...)) (if (and ... ...) (progn ... t) (wl-summary-redisplay-internal folder number) (when ... ...) nil))
wl-summary-set-message-buffer-or-redisplay(ignore-original)
(if (wl-summary-set-message-buffer-or-redisplay (quote ignore-original)) (progn (set-buffer cur-buf) (if ... ...)))
(when (wl-summary-set-message-buffer-or-redisplay (quote ignore-original)) (set-buffer cur-buf) (if (wl-message-next-page) (wl-summary-down t)))
(let ((cur-buf ...)) (wl-summary-toggle-disp-msg (quote on)) (when (wl-summary-set-message-buffer-or-redisplay ...) (set-buffer cur-buf) (if ... ...)))
wl-summary-read()
call-interactively(wl-summary-read nil nil)
recursive-edit()
byte-code("\306 @\307=\203! debug(error (wrong-type-argument number-or-marker-p nil))
#[(child) "\306 \"\307\n\236A\203@ mapcar(#[(child) "\306 \"\307\n\236A\203@ nil] (1) nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]))
mime-display-multipart/alternative([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] ((body-presentation-method . mime-display-multipart/alternative) (body . visible) (encoding . "7bit") ("boundary" . "Apple-Mail-12-409955592") (subtype . alternative) (type . multipart) (entity-button . invisible) (header . visible) (major-mode . wl-original-message-mode)))
mime-display-entity([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] nil ((entity-button . invisible) (header . visible) (major-mode . wl-original-message-mode)) #<buffer *WL:Message*<5>>)
ad-Orig-mime-display-message([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] #<buffer *WL:Message*<5>> nil (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-togg
le-disp-summary) (68 . wl-message-delete-current-part)) wl-original-message-mode nil)
mime-display-message([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] #<buffer *WL:Message*<5>> nil (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggle-disp-
summary) (68 . wl-message-delete-current-part)) wl-original-message-mode)
(let ((elmo-message-displaying t) (default-mime-charset ...)) (mime-display-message entity preview-buffer nil keymap original-major-mode))
(lambda (entity preview-buffer &optional original-major-mode keymap) (let (... ...) (mime-display-message entity preview-buffer nil keymap original-major-mode)))([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] #<buffer *WL:Message*<5>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-me
ssage-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part)))
apply((lambda (entity preview-buffer &optional original-major-mode keymap) (let (... ...) (mime-display-message entity preview-buffer nil keymap original-major-mode))) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> (... ... ...) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #1 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #1 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] #<buffer *WL:Message*<5>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-m
essage-wheel-down) (119 . wl-draft) (3 keymap ...) (108 . wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part))))
luna-call-next-method()
luna-apply-generic([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] elmo-mime-entity-display [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Messag
e*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] #<buffer *WL:Message*<5>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108 . wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part)))
elmo-mime-entity-display([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] #<buffer *WL:Message*<5>> wl-original-message-mode (keymap (S-mouse-wheel1 . wl-message-wheel-dispatcher) (mouse-wheel1 . wl-message-wheel-dispatcher) (S-mouse-5 . wl-message-wheel-up) (S-mouse-4 . wl-message-wheel-down) (mouse-5 . wl-message-wheel-up) (mouse-4 . wl-message-wheel-down) (119 . wl-draft) (3 keymap (58 keymap ... ...)) (108
. wl-message-toggle-disp-summary) (68 . wl-message-delete-current-part)))
(if (wl-message-mime-analysis-p display-type) (elmo-mime-entity-display entity (current-buffer) (quote wl-original-message-mode) (wl-message-define-keymap)) (let* (... ...) (elmo-mime-entity-display-as-is entity ... ... ...) (let ... ...)))
(let ((default-mime-charset wl-mime-charset) (elmo-mime-charset wl-mime-charset) (wl-message-buffer-require-all-header ...)) (if (wl-message-mime-analysis-p display-type) (elmo-mime-entity-display entity ... ... ...) (let* ... ... ...)) (setq wl-message-buffer-cur-display-type display-type wl-message-buffer-mime-entity entity) (run-hooks (quote wl-message-display-internal-hook)) (setq buffer-read-only t))
wl-message-display-internal([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ((type . multipart) (subtype . alternative) ("boundary" . "Apple-Mail-12-409955592")) ([mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "quoted-printable" ... nil #<buffer *Original* *WL:Message*<5>> 3964 4054 4055 4352 nil] [mime-elmo-buffer-entity [0 0 0 0 0 0 0] #<buffer *Original* *WL:Message*<5>> ... nil #0 ... nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 4379 4444 4445 197655 nil]) nil nil nil "7bit" nil nil #<buffer *Original* *WL:Message*<5>> 1 3936 3937 197684 nil] mime-partial-header)
(save-current-buffer (set-buffer hit) (when (or force-reload ... ... ...) (setq entity ...)) (unless entity (error "Cannot display message %s/%s" fname number)) (wl-message-display-internal entity display-type))
(with-current-buffer hit (when (or force-reload ... ... ...) (setq entity ...)) (unless entity (error "Cannot display message %s/%s" fname number)) (wl-message-display-internal entity display-type))
(progn (with-current-buffer hit (when ... ...) (unless entity ...) (wl-message-display-internal entity display-type)) (quit (wl-message-buffer-cache-delete) (error "Display message %s/%s is quitted" fname number)))
(if (or force-reload redisplay) (progn (with-current-buffer hit ... ... ...) (quit ... ...)))
(when (or force-reload redisplay) (with-current-buffer hit (when ... ...) (unless entity ...) (wl-message-display-internal entity display-type)) (quit (wl-message-buffer-cache-delete) (error "Display message %s/%s is quitted" fname number)))
(let* ((msg-id ...) (fname ...) (hit ...) (redisplay nil) entity) (when (and hit ...) (wl-message-buffer-cache-delete ...) (setq hit nil)) (if hit (progn ... ...) (setq hit ...) (setq redisplay t)) (when (or force-reload redisplay) (with-current-buffer hit ... ... ...) (quit ... ...)) hit)
wl-message-buffer-display([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".ENS/INBOX" "." "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" [modb-standard [0 0 0 0 0 0 0] "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" (41) t x-ctext (19558 19901 20234 20693 20811 20812 20813) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext ((19558 . "1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20813 . "1348253642.2599_1.villian") (19901 . "1347313176_0.9024.villian,U=34982,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20234 . "1347692371_0.15775.villian,U=35326,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20693 . "1348084362_0.21216.villian,U=35861,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20811 . "1348252780_0.31073.villian,U=36083,FMD5=7e
33429f656f1e6e9d79b29c3f82c57e") (20812 . "1348253200_0.31073.villian,U=36084,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1347692371_0\.15775\.villian\,U=35326\,FMD5=7e33429f656f1e6e9d79b29c3f82c57e 0 0 0 0 0 0 0 0 0 ...] 20813 "/home/villiam/Mail/ENS/INBOX" nil nil ("1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")] 20693 mime-partial-header nil)
(setq wl-message-buffer (wl-message-buffer-display folder number display-type force-reload))
(let* ((default-mime-charset wl-mime-charset) (buffer-read-only nil) (summary-buf ...) message-buf entity summary-win flags) (setq buffer-read-only nil) (setq wl-message-buffer (wl-message-buffer-display folder number display-type force-reload)) (setq message-buf wl-message-buffer) (wl-message-select-buffer wl-message-buffer) (set-buffer message-buf) (wl-deactivate-region) (make-local-variable (quote truncate-partial-width-windows)) (setq truncate-partial-width-windows nil) (setq truncate-lines wl-message-truncate-lines) (setq buffer-read-only nil) (setq wl-message-buffer-cur-summary-buffer summary-buf) (setq wl-message-buffer-cur-folder (elmo-folder-name-internal folder)) (setq wl-message-buffer-cur-number number) (setq wl-message-buffer-flag-indicator (wl-message-flag-indicator ...)) (wl-line-formatter-setup wl-message-buffer-mode-line-formatter wl-message-mode-line-format wl-message-mode-line-format-spec-alist) (setq mode-line-buffer-identification (funcall wl-message-bu
ffer-mode-line-formatter)) (ignore-errors (wl-message-narrow-to-page)) (goto-char (point-min)) (when (re-search-forward "^$" nil t) (wl-message-add-buttons-to-header ... ...) (wl-message-add-buttons-to-body ... ...)) (when (and wl-message-use-header-narrowing ...) (wl-message-header-narrowing)) (goto-char (point-min)) (ignore-errors (run-hooks ...)) (set-buffer-modified-p nil) (setq buffer-read-only t) (set-buffer summary-buf) (setq summary-win (get-buffer-window summary-buf)) (if (window-live-p summary-win) (select-window summary-win)))
wl-message-redisplay([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".ENS/INBOX" "." "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" [modb-standard [0 0 0 0 0 0 0] "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" (41) t x-ctext (19558 19901 20234 20693 20811 20812 20813) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext ((19558 . "1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20813 . "1348253642.2599_1.villian") (19901 . "1347313176_0.9024.villian,U=34982,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20234 . "1347692371_0.15775.villian,U=35326,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20693 . "1348084362_0.21216.villian,U=35861,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20811 . "1348252780_0.31073.villian,U=36083,FMD5=7e33429
f656f1e6e9d79b29c3f82c57e") (20812 . "1348253200_0.31073.villian,U=36084,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1347692371_0\.15775\.villian\,U=35326\,FMD5=7e33429f656f1e6e9d79b29c3f82c57e 0 0 0 0 0 0 0 0 0 ...] 20813 "/home/villiam/Mail/ENS/INBOX" nil nil ("1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")] 20693 mime-partial-header nil)
(progn (setq wl-summary-buffer-disp-msg t) (wl-summary-push-message wl-summary-buffer-current-msg) (if (and ... ...) (if ... ...)) (setq wl-current-summary-buffer (current-buffer)) (wl-message-redisplay folder num (wl-message-make-display-type ... ...) (or force-reload ...)) (when (elmo-message-use-cache-p folder num) (elmo-message-set-cached folder num t)) (ignore-errors (if ... ... ... ... ...)) (setq wl-summary-buffer-current-msg num) (when wl-summary-recenter (recenter ...) (if ... ...)) (wl-highlight-summary-displaying) (wl-message-buffer-prefetch-next folder num (min ... ...) (current-buffer) wl-summary-buffer-mime-charset) (run-hooks (quote wl-summary-redisplay-hook)))
(if num (progn (setq wl-summary-buffer-disp-msg t) (wl-summary-push-message wl-summary-buffer-current-msg) (if ... ...) (setq wl-current-summary-buffer ...) (wl-message-redisplay folder num ... ...) (when ... ...) (ignore-errors ...) (setq wl-summary-buffer-current-msg num) (when wl-summary-recenter ... ...) (wl-highlight-summary-displaying) (wl-message-buffer-prefetch-next folder num ... ... wl-summary-buffer-mime-charset) (run-hooks ...)) (message "No message to display."))
(let* ((folder ...) (num ...) (wl-mime-charset wl-summary-buffer-mime-charset) (default-mime-charset wl-summary-buffer-mime-charset) fld-buf fld-win thr-entity (elmo-message-fetch-confirm ...)) (if (and wl-thread-open-reading-thread ... ... ...) (wl-thread-force-open)) (if num (progn ... ... ... ... ... ... ... ... ... ... ... ...) (message "No message to display.")))
wl-summary-redisplay-internal([elmo-maildir-folder [0 0 0 0 0 0 0] maildir ".ENS/INBOX" "." "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" [modb-standard [0 0 0 0 0 0 0] "/home/villiam/.elmo/maildir/ shome svilliam sMail sENS sINBOX" (41) t x-ctext (19558 19901 20234 20693 20811 20812 20813) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ...] (... ...) nil] nil nil t nil nil x-ctext ((19558 . "1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20813 . "1348253642.2599_1.villian") (19901 . "1347313176_0.9024.villian,U=34982,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20234 . "1347692371_0.15775.villian,U=35326,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20693 . "1348084362_0.21216.villian,U=35861,FMD5=7e33429f656f1e6e9d79b29c3f82c57e") (20811 . "1348252780_0.31073.villian,U=36083,FMD
5=7e33429f656f1e6e9d79b29c3f82c57e") (20812 . "1348253200_0.31073.villian,U=36084,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")) [0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1347692371_0\.15775\.villian\,U=35326\,FMD5=7e33429f656f1e6e9d79b29c3f82c57e 0 0 0 0 0 0 0 0 0 ...] 20813 "/home/villiam/Mail/ENS/INBOX" nil nil ("1308490101_0.28818.villian,U=6478,FMD5=7e33429f656f1e6e9d79b29c3f82c57e")] 20693)
(if (and (string= ... ...) (eq number ...)) (progn (set-buffer wl-message-buffer) t) (wl-summary-redisplay-internal folder number) (when (buffer-live-p wl-message-buffer) (set-buffer wl-message-buffer)) nil)
(let ((folder wl-summary-buffer-elmo-folder) (number ...) cur-folder cur-number message-last-pos) (when (buffer-live-p wl-message-buffer) (save-window-excursion ... ... ... ...)) (if (and ... ...) (progn ... t) (wl-summary-redisplay-internal folder number) (when ... ...) nil))
wl-summary-set-message-buffer-or-redisplay(ignore-original)
(if (wl-summary-set-message-buffer-or-redisplay (quote ignore-original)) (progn (set-buffer cur-buf) (if ... ...)))
(when (wl-summary-set-message-buffer-or-redisplay (quote ignore-original)) (set-buffer cur-buf) (if (wl-message-next-page) (wl-summary-down t)))
(let ((cur-buf ...)) (wl-summary-toggle-disp-msg (quote on)) (when (wl-summary-set-message-buffer-or-redisplay ...) (set-buffer cur-buf) (if ... ...)))
wl-summary-read()
call-interactively(wl-summary-read nil nil)
Sorry for the huge delay.
William