[emacs-wiki-discuss] Re: Optional Showing of "Done" Tasks

[Sacha Chua]

Kenneth Jacker <address@hidden> writes:

> Normally, I want to mark a task as finished (planner-task-done), but
> not have it shown grayed with a line through it in my day pages.
> I just want it to go away (but, of course, remain on corresponding
> plan pages).

I find it nice to have a daily record of my accomplishments, and
seeing all those crossed-out tasks makes me feel good. =) Besides,
planner-sort-tasks moves the tasks to the bottom of the list anyway.
If you really don't want to see them, though, you could use something
like this:

(defun khj/planner-unschedule-finished-task (old-status new-status)
  "Remove planned tasks from day pages after completion.
Add this to `planner-mark-task-hook'."
  (when (string= new-status "X")
    (let ((info (planner-current-task-info)))
      (when (planner-task-plan info)
        (planner-copy-or-move-task nil t)
        (planner-find-file (planner-task-plan info))
        (planner-find-task info))))
  t)
(add-hook 'planner-mark-task-hook 'khj/planner-unschedule-finished-task)

-- 
Sacha Chua <address@hidden> - open source, free software geekette
http://sacha.free.net.ph/ - PGP Key ID: 0xE7FDF77C
interests: emacs, gnu/linux, personal information management, public speaking
sachac on irc.freenode.net#emacs . YM: sachachua83