changeset 8459:e1a2458245cb

(display-time-filter): pm starts at 12, not 13.
author Richard M. Stallman <rms@gnu.org>
date Fri, 05 Aug 1994 18:56:32 +0000
parents a95ca44cec95
children 5fd799a9946e
files lisp/time.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/time.el	Fri Aug 05 05:31:36 1994 +0000
+++ b/lisp/time.el	Fri Aug 05 18:56:32 1994 +0000
@@ -138,7 +138,7 @@
                                     (if (= hour 0)
                                         12
                                       hour))))
-         (am-pm (if (> hour 12) "pm" "am"))
+         (am-pm (if (>= hour 12) "pm" "am"))
          (minutes (substring time 14 16))
          (seconds (substring time 17 19))
          (time-zone (car (cdr (current-time-zone))))