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

Agenda: Show time-of-day in block also after day 1

Browse source 
Lukas Stelmach writes:

> Isn't it wrong when a note like this:
>
> * A very interesting meeting 11:15-12:00
>  <2009-11-30 Mon>--<2009-12-01 Tue>
>
> Shows up in the agenda time gird only on monday while being untimed on
> tuesday? To make it right I do
>
> * A very interesting meeting
>  <2009-11-30 Mon 11:15>--<2009-11-30 Mon 12:00>
>  <2009-12-01 Tue 11:15>--<2009-12-01 Tue 12:00>
>
> or simply
>
> * A very interesting meeting 11:15-12:00
>  <2009-11-30 Mon>
>  <2009-12-01 Tue>
>
> Which works but doesn't show the recurrence counter.
This commit is contained in:
Carsten Dominik 2009-11-26 09:04:53 +01:00
parent 8acb7a3d59
commit 3efe6f29a8
2 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,5 +1,8 @@
2009-11-26 Carsten Dominik <carsten.dominik@gmail.com> 2009-11-26 Carsten Dominik <carsten.dominik@gmail.com>
* org-agenda.el (org-agenda-get-blocks): Look at time string also
on days after the first one.
* org.el (org-insert-heading): Also check for item before assuming * org.el (org-insert-heading): Also check for item before assuming
before-first-heading condition. before-first-heading condition.

2
lisp/org-agenda.el
View file

@ -4481,7 +4481,7 @@ FRACTION is what fraction of the head-warning time has passed."
org-agenda-timerange-leaders) org-agenda-timerange-leaders)
(1+ (- d0 d1)) (1+ (- d2 d1))) (1+ (- d0 d1)) (1+ (- d2 d1)))
head category tags head category tags
(if (= d0 d1) timestr)))) timestr)))
(org-add-props txt props (org-add-props txt props
'org-marker marker 'org-hd-marker hdmarker 'org-marker marker 'org-hd-marker hdmarker
'type "block" 'date date 'type "block" 'date date