[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Shimbun Basics
At Sat, 31 May 2003 19:06:51 +0900,
TSUCHIYA Masatoshi <tsuchiya@pine.kuee.kyoto-u.ac.jp> wrote:
> >> On Sat, 31 May 2003 18:57:26 +0900
> >> minakaji@namazu.org (NAKAJIMA Mikio) said as follows:
>
> >あれ? 今 shimbun.el を読んで気付いたのですが、
> >shimbun-foobar-coding-system の値は shimbun インスタンスの
> >coding-system スロットに代入されますが、どこからも参照されず、使用さ
> >れていないのでしたっけ?
>
> See [emacs-w3m:00963], [emacs-w3m:01729], [emacs-w3m:01737].
そうですよね、そんな話も確かしました f(^^;。ところで、X-Mail-Count:
01737 を (自分のハードディスクにはなかったので
http://emacs-w3m.namazu.org/ml/ からようやく掘りおこして思ったこと。
> この変更を行っていて気が付いたのですが、shimbun-retrieve() がインデッ
> クスや記事本体を取得するときに、以下のように文字コードを考慮してくれる
> と、かなり文字化けの可能性が減るのではないか、と思ったのですが。
>
> shimbun-retrieve-url() の呼び出されている個所が多すぎて、ちょっと挫折
> しました。
>
> (luna-define-method shimbun-retrieve-url
> ((shimbun shimbun) url &optional no-cache no-decode)
> (let (type)
> (when (and url (setq type (w3m-retrieve url no-decode no-cache)))
> (w3m-with-work-buffer
> (unless no-decode
> (let ((w3m-coding-system-priority-list
> w3m-coding-system-priority-list))
> (when (shimbun-coding-system-internal shimbun)
> (push (shimbun-coding-system-internal shimbun)))
> (w3m-decode-buffer url))))
> (unless (eq (current-buffer)
> (get-buffer w3m-work-buffer-name))
> (when no-decode
> (set-buffer-multibyte nil))
> (insert-buffer w3m-work-buffer-name)))
> type))
(1)push の第二引数がない。
(push (shimbun-coding-system-internal shimbun)
w3m-coding-system-priority-list)
ですね、きっと。
(2)shimbun-retrieve-url はメソッドでなくちゃ駄目なのか? defun で宣言
するので足りるのでは?
(3)何故「shimbun-retrieve-url() の呼び出されている個所」が多すぎると上
記のメソッドが採用されなかったのか?
--
中島幹夫 <minakaji@namazu.org>
home: http://www.asahi-net.or.jp/~gy2m-nkjm
diary: http://slashdot.jp/journal.pl?op=display&uid=5767