Re: todo and deadline highlighting

[Carsten Dominik <dominik@science.uva.nl>]

This looks like it is doing the right thing.

- Carsten

On Jun 19, 2006, at 22:09, Piotr Zielinski wrote:

> On 12/06/06, Carsten Dominik <dominik@science.uva.nl> wrote:
>
>> On Jun 8, 2006, at 1:34, Piotr Zielinski wrote:
>>
>> > The following two functions redefine org-show-todo-tree, so that 
>> TODO
>> > items SCHEDULED for the future are not highlighted.  Only
>> > non-scheduled TODO items or TODO items scheduled for the past or
>> > present are highlighted.  The SCHEDULED directive must be on the 
>> same
>> > line as the TODO keyword.
>>
>> This is another interesting idea, but the search must allow more than
>> the current line.  Everything up to the next headline  (or any level)
>> should be searched.
>
> Another try:
>
> (defun org-todo-is-current ()
>  "Checks whether a TODO item is current."
>  (if (re-search-forward org-scheduled-time-regexp
> 			 (save-excursion (outline-next-heading) (point)) t)
>      (let ((today (calendar-absolute-from-gregorian
> 		    (calendar-current-date)))
> 	    (timestamp (time-to-days
> 			(org-time-string-to-time (match-string 1)))))
> 	(<= timestamp today))
>    t))
>
>
> Piotr
>
>

--
Carsten Dominik
Sterrenkundig Instituut "Anton Pannekoek"
Universiteit van Amsterdam
Kruislaan 403
NL-1098SJ Amsterdam
phone: +31 20 525 7477