diff options
| author | Bastien <bzg@gnu.org> | 2021-05-15 15:01:55 +0200 |
|---|---|---|
| committer | Bastien <bzg@gnu.org> | 2021-05-15 16:13:49 +0200 |
| commit | 81c7a2dee8e6d0c5e58d0cb4ca97cfc9477ff660 (patch) | |
| tree | 2ef25a2188a3ec4d175cebe6d14eadfefe60a039 | |
| parent | f0447de94193d24c4e8b2f23169fb7bdf175ec94 (diff) | |
| download | org-mode-81c7a2dee8e6d0c5e58d0cb4ca97cfc9477ff660.tar.gz | |
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
| -rw-r--r-- | lisp/org-agenda.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 4ed1969..95848ab 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -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" "") |