multipart/related (Re: encapsulate shimbun article)

[守岡 知彦 / MORIOKA Tomohiko]

>>>>> In [emacs-mime-ja : No.00909] 
>>>>>	"寺西さん" = Yuuichi Teranishi <teranisi ＠ gohome.org> wrote:

寺> しかし、SEMI だと multipart/related なのに
寺> 最初のパート以外もインライン画像として表示されてしまいます。
寺> どうにかならないものでしょうか。

実は、multipart/related でも各画像パートをインライン表示するのは私の悪
い趣味だったんですが、確かに default の設定としては不適切だと思います。
そういう訳で、SEMI の default の設定として

寺西さん> (defun mime-display-multipart/related (entity situation)
寺西さん>   (let* ((param-start (mime-parse-msg-id
寺西さん> 		       (std11-lexical-analyze
寺西さん> 			(cdr (assoc "start"
寺西さん> 				    (mime-content-type-parameters
寺西さん> 				     (mime-entity-content-type entity)))))))
寺西さん> 	 (start (or (and param-start (mime-find-entity-from-content-id
寺西さん> 				      param-start
寺西さん> 				      entity))
寺西さん> 		    (car (mime-entity-children entity))))
寺西さん> 	 (original-major-mode-cell (assq 'major-mode situation))
寺西さん> 	 (default-situation (cdr (assq 'childrens-situation situation))))
寺西さん>     (if original-major-mode-cell
寺西さん> 	(setq default-situation
寺西さん> 	      (cons original-major-mode-cell default-situation)))
寺西さん>     (mime-display-entity start nil default-situation)))

のように、multipart/related の時に各画像パートを個別にインライン表示し
ないものを採用したいと思います。そういう訳で、よろしければ semi-1_14
に commit しといて頂けないでしょうか？

よろしくお願いします。

-- 
===『幾千億の分子に分かれても ========================================
     決して忘れない。    
     この宇宙が終るまで』              守岡 知彦 (MORIOKA Tomohiko)
====================== Email: <tomo ＠ kanji.zinbun.kyoto-u.ac.jp> ======