Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

[nnshimbun] toggle inline images

0 views
Skip to first unread message

Katsumi Yamaoka

unread,
Jul 26, 2001, 11:52:35 PM7/26/01
to
T-gnus の nnshimbun の記事でインライン画像の表示を on/off するコ
マンドです。キー操作は summary バッファで "i"。

(defun gnus-summary-shimbun-toggle-inline-images ()
"Toggle displaying of inline images in the shimbun article buffer."
(interactive)
(if (and (gnus-summary-article-number)
(string-match "^nnshimbun\\+" gnus-newsgroup-name))
(let ((article (or (get-buffer-window gnus-article-buffer t)
(progn
(gnus-summary-show-article)
(get-buffer-window gnus-article-buffer t)))))
(save-window-excursion
(select-window article)
(w3m-toggle-inline-images)))))

(eval-after-load "gnus-sum"
'(progn
(byte-compile 'gnus-summary-shimbun-toggle-inline-images)
(define-key gnus-summary-mode-map "i"
'gnus-summary-shimbun-toggle-inline-images)))

キーを特定しているので、T-gnus に盛り込むのはパス。

一方 Oort Gnus で小泉メルマガなどの multipart/related な絵を見る
ためには、これとは別の対処が必要でした。

(eval-after-load "gnus-art"
'(or (assoc "multipart/related" gnus-mime-multipart-functions)
(setq gnus-mime-multipart-functions
(cons
(cons
"multipart/related"
(byte-compile
(lambda (handle)
(gnus-mime-display-mixed (cdr handle)))))
gnus-mime-multipart-functions))))

W3 が対応していないという理由で Oort Gnus はやる気が無いらしく、
multipart/related に対応したコードも少しあるものの、かなりいい加
減です。上記のコードは昼休みにできる範囲内で、そのいい加減さを少
しだけ減らしたものです。
--
Katsumi Yamaoka <yam...@jpl.org>

Katsumi Yamaoka

unread,
Jul 27, 2001, 8:28:45 AM7/27/01
to
>>>>> In [semi-gnus-ja : No.6169]
>>>>> Katsumi Yamaoka <yam...@jpl.org> wrote:

山岡> W3 が対応していないという理由で Oort Gnus はやる気が無いらしく、
山岡> multipart/related に対応したコードも少しあるものの、かなりいい加
山岡> 減です。

以下の advice を使って、Oort Gnus でも W3 の代わりに W3M で
text/html のレンダリングを行なうことができました。

(defadvice mm-inline-text (around use-w3m-for-html-documents activate)
"Use W3M for handling html documents."
(if (equal "html" (mm-handle-media-subtype (ad-get-arg 0)))
(let* ((handle (ad-get-arg 0))
(text (mm-get-part handle))
(charset (mail-content-type-get
(mm-handle-type handle) 'charset)))
(save-excursion
(save-restriction
(narrow-to-region (point) (point))
(insert (mm-decode-string text charset))
(w3m-region (point-min) (point-max)))))
ad-do-it))

もっとも、これはまだたいへん雑なシロモノで、multipart/related な
絵を見るまでには至っていません。
--
Katsumi Yamaoka <yam...@jpl.org>

TSUCHIYA Masatoshi

unread,
Aug 2, 2001, 3:58:09 AM8/2/01
to
>> On Fri, 27 Jul 2001 21:27:31 +0900
>> 「山」== yam...@jpl.org (Katsumi Yamaoka) said as follows:

山> 以下の advice を使って、Oort Gnus でも W3 の代わりに W3M で
山> text/html のレンダリングを行なうことができました。

有沢さんが、似たような情報を日記に記述されていましたよ。

http://www.nijino.com/ari/diary/200107.shtml#200107180

--
土屋 雅稔 ( TSUCHIYA Masatoshi )
http://www-nagao.kuee.kyoto-u.ac.jp/member/tsuchiya/
;; タレコミ、タレコミ

Katsumi Yamaoka

unread,
Aug 2, 2001, 4:19:11 AM8/2/01
to
>>>>> In [semi-gnus-ja : No.6196]
>>>>> TSUCHIYA Masatoshi <tsuc...@pine.kuee.kyoto-u.ac.jp> wrote:
土屋さん> >> On Fri, 27 Jul 2001 21:27:31 +0900
土屋さん> >> 「山」== yam...@jpl.org (Katsumi Yamaoka) said as follows:

山> 以下の advice を使って、Oort Gnus でも W3 の代わりに W3M で
山> text/html のレンダリングを行なうことができました。

土屋さん> 有沢さんが、似たような情報を日記に記述されていましたよ。
土屋さん> http://www.nijino.com/ari/diary/200107.shtml#200107180

あらま。John Wiegley さんのを試してみましたが、見た目の効果はぼ
くのと変わらないみたいですね。でも明かに彼の方が Oort Gnus を良
く知っているのと、XEmacs にも対応している点でぼくの負け。^^;;
--
Katsumi Yamaoka <yam...@jpl.org>

0 new messages