Index: emacs/lisp/time.el
diff -c emacs/lisp/time.el:1.82 emacs/lisp/time.el:1.83
*** emacs/lisp/time.el:1.82 Wed Feb 9 15:50:40 2005
--- emacs/lisp/time.el Mon May 16 11:33:47 2005
***************
*** 331,337 ****
;; 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))
(12-hours (int-to-string (1+ (% (+ hour 11) 12))))
(am-pm (if (>= hour 12) "pm" "am"))
(minutes (substring time 14 16))
--- 331,337 ----
;; Record that mail file is accessible.
(setq display-time-server-down-time nil)))))))
(24-hours (substring time 11 13))
! (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))
_______________________________________________
Emacs-diffs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/emacs-diffs
