shimbun-retrieve-url (was: Shimbun Basics)

[TSUCHIYA Masatoshi <tsuchiya@xxxxxxxxxxxxxxxxxxxxxxx>]

>> On Sat, 31 May 2003 22:23:11 +0900
>> 「土」== tsuchiya@pine.kuee.kyoto-u.ac.jp (TSUCHIYA Masatoshi) said as follows:

中> (2) shimbun-retrieve-url はメソッドでなくちゃ駄目なのか?  defun で
中> 宣言するので足りるのでは?

土> ああ，これはですね，上記のように shimbun-XXX-coding-system を考慮
土> するように変更する場合は，各バックエンド側で 
土> shimbun-retrieve-url() を再定義して調節することが必要となる場合が
土> あるのではないかと思って，メソッドにしようとしたのです(多分)．

この理由は間違いでした．実際に検討を始めてみて気が付いたのですが，

    (defun shimbun-retrieve-url (url &optional no-cache no-decode)
      "Rertrieve URL contents and insert to current buffer.
    Return content-type of URL as string when retrieval succeeded."
      (let (type)
        (when (and url (setq type (w3m-retrieve url nil no-cache)))
          (unless no-decode
            (let ((w3m-use-refresh nil)
                  (w3m-coding-system-priority-list
                   w3m-coding-system-priority-list))
              (when (shimbun-coding-system-internal shimbun)
                (push (shimbun-coding-system-internal shimbun)
                      w3m-coding-system-priority-list))
              (w3m-decode-buffer url)
              (goto-char (point-min))))
          type)))

というように書くと，shimbun-coding-system-internal() にアクセスするた
めの元々のオブジェクト shimbun が未定義変数になってしまいます．なので
わざわざ，shimbun-retrieve-url() をメソッドにしようとしたのですね．

でもって，そうすると，あらゆる shimbun-retrieve-url() の呼出し個所で引
数の仕様をきちんと訂正する必要があって，

土> shimbun-retrieve-url() の呼び出されている個所が多すぎて、ちょっと
土> 挫折しました。

を繰り返してしまいました．

それに，shimbun-retrieve-url() の引数仕様を変更するとなると，個人的に
作成されている shimbun backends のかなり大部分を動かなくしてしまうこと
になりそうです．

さて，どうしたものでしょうね．

-- 
土屋 雅稔 ( TSUCHIYA Masatoshi )