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 <[EMAIL PROTECTED]> 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
_______________________________________________
Emacs-orgmode mailing list
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
