0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-29 18:36:26 +00:00

lisp/org-agenda.el: Use "09:00" instead of " 9:00"

* lisp/org-agenda.el (org-get-time-of-day): Use "09:00" instead
of " 9:00" when displaying as a string.

This makes the string more readable, especially for users reading
the agenda with a screen reader.

Reported-by: Sébastien Hinderer
This commit is contained in:
Bastien 2021-05-15 15:01:55 +02:00
parent f0447de941
commit 81c7a2dee8

View file

@ -6995,7 +6995,7 @@ HH:MM."
(h2 (if (and string mod24 (not (and (= m 0) (= h1 24))))
(mod h1 24) h1))
(t0 (+ (* 100 h2) m))
(t1 (concat (if (>= h1 24) "+" " ")
(t1 (concat (if (>= h1 24) "+" "0")
(if (and org-agenda-time-leading-zero
(< t0 1000)) "0" "")
(if (< t0 100) "0" "")