Re: nnshimbun で security-memo が月に 1 回だけ更新…？

[TSUCHIYA Masatoshi <tsuchiya@xxxxxxxxxxxxxxxxxxxxxxx>]

>> On Thu, 01 Aug 2002 12:45:14 +0900
>> 「山」== yamaoka@jpl.org (Katsumi Yamaoka) said as follows:

富> そこで、ここのshimbun-get-headersが始まる直前で「 *temp*」バッ
富> ファをのぞいたら、カーソルが、

富>    <li><a HREF="200208.month/index.html">〜
富>                          ↑
富>                           このあたりにいました。

山> ふーむ、実は昨日も sb-slashdot-jp で似たような指摘を頂いたのですが、
山> 何か大元の方で変わってしまったのかな。わかりますか?

えっと，ひょっとして w3m-decode-get-refresh() が犯人なのではないでしょ
うか．関数定義を眺めただけなので確言できないのですが，save-excursion 
もされていませんし，カーソルが移動してしまう可能性は高いと思います．

で，対策ですが，

(1) shimbun ライブラリから利用している時は，refresh は無効になっている
    べきである．

--- shimbun.el	9 Jul 2002 03:42:11 -0000	1.55
+++ shimbun.el	8 Aug 2002 15:49:31 -0000
@@ -116,7 +116,8 @@
   (let (type)
     (when (and url (setq type (w3m-retrieve url nil no-cache)))
       (unless no-decode
-	(w3m-decode-buffer url))
+	(let (w3m-use-refresh)
+	  (w3m-decode-buffer url)))
       type)))
 
 (defalias 'shimbun-content-type 'w3m-content-type)
(2) shimbun-retrieve-url() でカーソル位置を (point-min) に移動するべき
    だ．

--- shimbun.el	9 Jul 2002 03:42:11 -0000	1.55
+++ shimbun.el	8 Aug 2002 15:51:30 -0000
@@ -116,7 +116,8 @@
   (let (type)
     (when (and url (setq type (w3m-retrieve url nil no-cache)))
       (unless no-decode
-	(w3m-decode-buffer url))
+	(w3m-decode-buffer url)
+	(goto-char (point-min)))
       type)))
 
 (defalias 'shimbun-content-type 'w3m-content-type)
どっちでしょう?

w3m-decode-buffer() で対策するという可能性も考えたのですが，
decode-coding-region() を呼び出してしまうと，マークもポイント位置も信
用できないでしょうから，ここで対策するのは難しいのではないかと思います．
と言うことは，(1)+(2) が正しいのかな?

;; でも，もし w3m-decode-get-refresh() が原因だとしたら，去年末からこ
;; の問題は発生していたはずなので，ちょっと確信は持てないのですが．

-- 
土屋 雅稔  ( TSUCHIYA Masatoshi )