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