Re: [emacs-wiki-discuss] Re: New behavior when marking tasks complete?

[Peter K . Lee]

Sacha Chua <address@hidden> writes:

> "Charles philip Chan" <address@hidden> writes:
>
>>> planner-sort-tasks moves the point around. dev/434 makes sure to keep
>>> the point on the same task if planner-sort-tasks is called, but I
>>> don't know whether that's reasonable behavior. What do people think?
>> I think it should go to the next open task.
>
> Okay. That's probably not a planner-sort-tasks thing, but rather
> something to add to planner-mark-task-hook.
>
> (defun cpc/planner-seek-next-open-task (old-status new-status)
>  "Find the next open task."
>  (when (string-match status "XC")
>    (let ((continue t))
>      (while continue
>        (if (re-search-forward planner-task-regexp nil t)
>            (let ((status (planner-task-status (planner-current-task-info))))
>              (unless (string-match status "XC")
>                (goto-char (planner-line-beginning-position))
>                (setq continue nil)))
>          (setq continue nil))))))
> (add-hook 'planner-mark-task-hook 'cpc/planner-seek-next-open-task t)
>
> This positions the point at the beginning of the next open task. You
> can do other things with it, of course... =)

Shouldn't that be (string-match new-status "XC") ?

-Peter