diff options
author | Glenn Morris <rgm@gnu.org> | 2009-09-02 03:21:26 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2009-09-02 03:21:26 +0000 |
commit | 0d00c61c1235fb9e54a8b6b4ef8cbbcc6271da83 (patch) | |
tree | e8fdf8e733b523b079eaecd4d6ed435446c8f4fe /lisp/time.el | |
parent | a68366f4da2cbf3c83e896ae2d8d0b73a84b666a (diff) | |
download | emacs-0d00c61c1235fb9e54a8b6b4ef8cbbcc6271da83.tar.gz |
(emacs-uptime, emacs-init-time): Use float-time rather than time-to-seconds.
Diffstat (limited to 'lisp/time.el')
-rw-r--r-- | lisp/time.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/time.el b/lisp/time.el index 1d0b951e4a4..2ff840db762 100644 --- a/lisp/time.el +++ b/lisp/time.el @@ -560,7 +560,7 @@ For example, the Unix uptime command format is \"%D, %z%2h:%.2m\"." (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 @@ For example, the Unix uptime command format is \"%D, %z%2h:%.2m\"." (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) |