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

w3m-bookmark-file-modtime



青田です。

w3m-bookmark-file-modtime() は visited-file-modtime() と同じ形式で値を返
すと言いながら実際には違う形式のものを返しているように思います。
(visited-file-modtime() の仕様変更に追随できていない?)

また、 Emacs 21.4、22.3.1 、 23.0.60.1 のどれにおいても
visited-file-modtime() の docstring を見ると file-attributes と同じ形式で
値を返すとあるので、 以下のように修正したほうがよいように思うのですがいか
がでしょうか?

(emacs-version)
=> "GNU Emacs 23.0.60.1 (x86_64-pc-linux-gnu, GTK+ Version 2.14.4)
 of 2008-10-26 on ***"

--- w3m-bookmark.el	17 Oct 2007 11:15:57 -0000	1.45
+++ w3m-bookmark.el	29 Oct 2008 15:36:46 -0000
@@ -144,12 +144,11 @@
 
 (defun w3m-bookmark-file-modtime ()
   "Return the bookmark file modification time.
-The value is a list of the form (HIGH . LOW), like the time values
-that `visited-file-modtime' returns.  When the bookmark file does not
-exist, returns (0 . 0)."
+The value is like the time values that `visited-file-modtime'
+returns.  When the bookmark file does not exist, returns (0
+. 0)."
   (if (file-exists-p w3m-bookmark-file)
-      (let ((time (nth 5 (file-attributes w3m-bookmark-file))))
-	(cons (car time) (cadr time)))
+      (nth 5 (file-attributes w3m-bookmark-file))
     (cons 0 0)))
 
 (defun w3m-bookmark-buffer (&optional no-verify-modtime)
--
青田