tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Third fix for the time-grid problem.

Browse source 
Hopefully the last one.  See commit 7b188f7d.
Reported by Memnon Anon <gegendosenfleisch@googlemail.com>.
This commit is contained in:
Bastien Guerry 2010-09-05 21:09:50 +02:00
parent 373224ecdb
commit 3ec4750271
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/org-agenda.el
View file

@ -5117,7 +5117,7 @@ The modified list may contain inherited tags, and tags matched by
(throw 'exit list))
(while (setq time (pop gridtimes))
(unless (and remove (member time have))
(setq time (format "%4d" time))
(setq time (replace-regexp-in-string " " "0" (format "%4s" time)))
(push (org-format-agenda-item
nil string "" nil
(concat (substring time 0 -2) ":" (substring time -2)))