(mixi-seconds-to-time): Simplified.

diff --git a/ChangeLog b/ChangeLog
index 7a2f53b..41f585b 100644 (file)
--- 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  <bg66@koka-in.org>
 

diff --git a/mixi.el b/mixi.el
index 1083659..e101a12 100644 (file)
--- 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."