Re: [質問] IMAP Summary buffer にて、添付ファイル ATT00001.txt のメールを参照すると、エ ラー

Kazuhiro Ito <[email protected]> Sat, 02 Mar 2019 09:51:20 +0900
Newsgroups gmane.mail.wanderlust.general.japanese
Message-ID <[email protected]>
> IMAP Summary buffer  ATT00001.txt 
> 

 Summary  SPC 

 wl-message-buffer-display 
backtrace 
elmo-message-fetch-threshold  elmo-message-fetch-confirm


(defun wl-message-buffer-display (folder number display-type
					 &optional force-reload unread)
  (let* ((msg-id (ignore-errors
		   (elmo-message-field folder number 'message-id)))
	 (fname (elmo-folder-name-internal folder))
	 (hit (wl-message-buffer-cache-hit (list fname number msg-id)))
	 (redisplay nil)
	 entity)
    (when (and hit (not (buffer-live-p hit)))
      (wl-message-buffer-cache-delete (list fname number msg-id))
      (setq hit nil))
    (if hit
	(progn
	  ;; move hit to the top.
	  (wl-message-buffer-cache-sort
	   (wl-message-buffer-cache-entry-make (list fname number msg-id) hit))
	  (with-current-buffer hit
	    ;; Rewind to the top page
	    (widen)
	    (goto-char (point-min))
	    (ignore-errors (wl-message-narrow-to-page))
	    (setq entity wl-message-buffer-mime-entity)
	    (unless (eq wl-message-buffer-cur-display-type display-type)
	      (setq redisplay t))))
      ;; delete tail and add new to the top.
      (setq hit (wl-message-buffer-cache-add (list fname number msg-id)))
      (setq redisplay t))
    (when (or force-reload redisplay)
      (with-current-buffer hit
	(when (or force-reload
		  (null entity)
		  (not (elmo-mime-entity-display-p
			entity
			(if (wl-message-mime-analysis-p display-type)
			    'mime
			  'as-is)))
		  (if (wl-message-display-no-merge-p display-type)
		      (elmo-mime-entity-reassembled-p entity)
		    (elmo-mime-entity-fragment-p entity)))
	  (setq entity (elmo-message-mime-entity
			folder
			number
			(wl-message-get-original-buffer)
			(and wl-message-auto-reassemble-message/partial
			     (not (wl-message-display-no-merge-p
				   display-type)))
			force-reload
			unread
			(not (wl-message-mime-analysis-p display-type)))))
	(unless entity
	  (error "Cannot display message %s/%s" fname number))
	(wl-message-display-internal entity display-type))
      ) ;; will not be used
    hit))

-- 
 (Kazuhiro Ito)