From: ueno Date: Tue, 24 Oct 2006 03:34:42 +0000 (+0000) Subject: (mixi-seconds-to-time): Simplified. X-Git-Tag: cache-file-branchpoint~40 X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=baa21d75f9a524b9f01ed42364a62f5612b49a9d;p=elisp%2Fmixi.git (mixi-seconds-to-time): Simplified. --- diff --git a/ChangeLog b/ChangeLog index 7a2f53b..41f585b 100644 --- a/ChangeLog +++ b/ChangeLog @@ -4,6 +4,7 @@ (mixi-encode-time-value): Abolished. (mixi-time-less-p): Simplified. (mixi-time-add): Simplified. + (mixi-seconds-to-time): Simplified. 2006-10-24 OHASHI Akira diff --git a/mixi.el b/mixi.el index 1083659..e101a12 100644 --- a/mixi.el +++ b/mixi.el @@ -389,9 +389,8 @@ Increase this value when unexpected error frequently occurs." ;; stolen from time-date.el (defun mixi-seconds-to-time (seconds) "Convert SECONDS (a floating point number) to a time value." - (list (floor seconds 65536) - (floor (mod seconds 65536)) - (floor (* (- seconds (ffloor seconds)) 1000000)))) + (cons (floor seconds 65536) + (floor (mod seconds 65536)))) (defun mixi-cache-expired-p (object) "Whether a cache of OBJECT is expired."