diff options
| author | Richard M. Stallman | 1994-08-05 18:56:32 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1994-08-05 18:56:32 +0000 |
| commit | 5b0841fdf2cc06638a3744cabaeff1e5dc9a88cc (patch) | |
| tree | e8c05461c1244e17133c8d10acb12330b8707547 | |
| parent | 81eee8abb0cc53ad9d4e7ae6949287a0eb26d03f (diff) | |
| download | emacs-5b0841fdf2cc06638a3744cabaeff1e5dc9a88cc.tar.gz emacs-5b0841fdf2cc06638a3744cabaeff1e5dc9a88cc.zip | |
(display-time-filter): pm starts at 12, not 13.
| -rw-r--r-- | lisp/time.el | 2 |
1 files changed, 1 insertions, 1 deletions
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)'.") | |||
| 138 | (if (= hour 0) | 138 | (if (= hour 0) |
| 139 | 12 | 139 | 12 |
| 140 | hour)))) | 140 | hour)))) |
| 141 | (am-pm (if (> hour 12) "pm" "am")) | 141 | (am-pm (if (>= hour 12) "pm" "am")) |
| 142 | (minutes (substring time 14 16)) | 142 | (minutes (substring time 14 16)) |
| 143 | (seconds (substring time 17 19)) | 143 | (seconds (substring time 17 19)) |
| 144 | (time-zone (car (cdr (current-time-zone)))) | 144 | (time-zone (car (cdr (current-time-zone)))) |