Re: [shimbun] img 表示について

[TSUCHIYA Masatoshi <tsuchiya@xxxxxxxxxxxxxxxxxxxxxxx>]

>> On Sun, 14 Jul 2002 21:19:08 +0900
>> kiyoshit@am.wakwak.com (Kiyoshi TAKEHARA) said as follows:

>> 少なくとも僕のところでは、「mime-w3m が読まれているのに text/html 
>> パートがフォーマットされない」という現象は再現していません。

ですよね?

>試しに、次のような .emacs で emacs -f wl してみたところ、やはり、前の
>メールと同じ状況でした。

同じ状況と言うのは，「text/html パートの HTML タグがレンダリングされな
いまま表示される」状態だと思っていいですか．

でしたら，相変わらず，text/html パートを表示するための mime-w3m.el の
設定が有効になっていません．

試しに，

    (require 'mime-w3m)

を ~/.emacs の先頭に移動したらどうなるでしょう? それでも駄目なら，本メー
ル末尾に添付した関数 mime-w3m-force-insinuate を ~/.emacs にコピーして，

    (defun mime-w3m-force-insinuate () ...)
    (require 'mime-w3m)
    (mime-w3m-force-insinuate)

というように設定を記述して試して貰えますか?

また，古い mime-w3m.el(c) が読みこまれていると言うことはありませんか?
M-x locate-library RET mime-w3m.el RET として表示されるパスは期待した
場所のものですか? 同様に，mime-w3m.elc についても期待した場所のものが
読み込まれていることを確認して頂けますか?

-- 
土屋 雅稔  ( TSUCHIYA Masatoshi )

(defun mime-w3m-force-insinuate ()
  "Insinuate `mime-w3m' module to SEMI."
  (setq mime-setup-enable-inline-html nil)
  (let (flag)
    (when (and (featurep 'semi-setup)
	       (boundp 'mime-preview-condition))
      (labels ((overwrite (x)
		(if (symbolp x)
		    (if (eq x 'mime-preview-text/html)
			(setq flag 'mime-w3m-preview-text/html)
		      (when (eq x 'mime-w3m-preview-text/html)
			(setq flag t))
		      x)
		  (if (consp x)
		      (cons (overwrite (car x))
			    (overwrite (cdr x)))
		    x))))
	(setq mime-preview-condition
	      (overwrite mime-preview-condition))))
    (unless flag
      (eval-after-load "mime-view"
	'(progn
	   (ctree-set-calist-strictly
	    'mime-preview-condition
	    '((type . text)
	      (subtype . html)
	      (body . visible)
	      (body-presentation-method . mime-w3m-preview-text/html)))
	   (set-alist 'mime-view-type-subtype-score-alist '(text . html) 3))))))