From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 5 Aug 1994 18:56:32 +0000 (+0000)
Subject: (display-time-filter): pm starts at 12, not 13.
X-Git-Tag: emacs-19.34~7394
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5b0841fdf2cc06638a3744cabaeff1e5dc9a88cc;p=emacs.git

(display-time-filter): pm starts at 12, not 13.
---

diff --git a/lisp/time.el b/lisp/time.el
index 901f00d9d3f..e9a57bf2400 100644
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -138,7 +138,7 @@ would give mode line times like `94/12/30 21:07:48 (UTC)'.")
                                     (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))))