[Date Prev][Date Next][Thread Prev][][Date Index][Thread Index]

Re: antenna KEY vs URL



From: TSUCHIYA Masatoshi <tsuchiya@pine.kuee.kyoto-u.ac.jp> さん曰く
Subject: [emacs-w3m:06467] Re: antenna KEY vs URL
Message-ID: <mpad68bd3mq.fsf@moss.lang-private.kuee.kyoto-u.ac.jp>
Date: Thu, 19 Feb 2004 14:45:01 +0900

土> (defun w3m-antenna-check-another-page (site handler url)
土>   (lexical-let ((site site))
土>     (w3m-process-do-with-temp-buffer
土>         (time (w3m-last-modified url t handler))
土>       (if time
土>           (w3m-antenna-site-update site (w3m-antenna-site-key site) time nil)
土>         (w3m-antenna-check-page site handler)))))

土>  ("http://www.koka-in.org/~bg66/blog/index.html"
土>   "bg66's Weblog"
土>   (w3m-antenna-check-another-page
土>    "http://www.koka-in.org/~bg66/blog/index.rdf")

これ試してみました。ちゃんと、更新時間は index.rdf の方を見に行
くようになりました。ありがとうございます。

# この関数用途が広いから w3m-antenna.el に入れといた方がよいかな。

ただし、index.html の方は last-modified header が帰ってこないの
で、

(defun w3m-about-antenna (url &optional no-decode no-cache
			      post-data referer handler)
 <<snip>>
    (let (changed unchanged)
      (dolist (site alist)
	(if (if (w3m-antenna-site-last-modified site)
		(w3m-time-newer-p (w3m-antenna-site-last-modified site)
				  (w3m-arrived-last-modified
				   (w3m-antenna-site-url site)))

(w3m-arrived-last-modified (w3m-antenna-site-url site))
が nil を返すため changed と判断されています。もしかすると、ここ
のところは、

		(w3m-time-newer-p (w3m-antenna-site-last-modified site)
				  (w3m-arrived-time ;; <= これね
				   (w3m-antenna-site-url site)))

の間違いでは?

-- 
白井秀行 (mailto:shirai@meadowy.org)