# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1251861686 0
# Node ID e9f8f2b78f103f509bb018d0ce41bdaedcd3a6db
# Parent  521d6c4a95a91c3183985964138bfa3d96c67b94
(emacs-uptime, emacs-init-time): Use float-time rather than time-to-seconds.

diff -r 521d6c4a95a9 -r e9f8f2b78f10 lisp/time.el
--- a/lisp/time.el	Wed Sep 02 03:20:48 2009 +0000
+++ b/lisp/time.el	Wed Sep 02 03:21:26 2009 +0000
@@ -560,7 +560,7 @@
   (interactive)
   (let ((str
          (format-seconds (or format "%Y, %D, %H, %M, %z%S")
-                         (time-to-seconds
+                         (float-time
                           (time-subtract (current-time) before-init-time)))))
     (if (interactive-p)
         (message "%s" str)
@@ -572,7 +572,7 @@
   (interactive)
   (let ((str
 	 (format "%.1f seconds"
-		 (time-to-seconds
+		 (float-time
 		  (time-subtract after-init-time before-init-time)))))
     (if (interactive-p)
         (message "%s" str)