diff lisp/time.el @ 62402:a7e02ef1e3d6

Replace `string-to-int' by `string-to-number'.

--- a/lisp/time.el	Mon May 16 10:07:59 2005 +0000
+++ b/lisp/time.el	Mon May 16 11:33:47 2005 +0000
@@ -331,7 +331,7 @@
 			      ;; Record that mail file is accessible.
 			      (setq display-time-server-down-time nil)))))))
          (24-hours (substring time 11 13))
-         (hour (string-to-int 24-hours))
+         (hour (string-to-number 24-hours))
          (12-hours (int-to-string (1+ (% (+ hour 11) 12))))
          (am-pm (if (>= hour 12) "pm" "am"))
          (minutes (substring time 14 16))