[emacs-wiki-discuss] planner-create-note-from-task-maybe

[Henrik S. Hansen]

Hi

A small function for automatically creating a note for a task, if point
is on that task.  A prefix argument puts the task on the project page
instead of the day page.

(defun hsh-planner-create-note-from-task-maybe (&optional plan-page-p)
  (interactive "P")
    (let ((case-fold-search nil)
          (planner-use-font-lock nil))
      (beginning-of-line)
      (if (re-search-forward "^#[A-C][0-9]*" nil t)
          (planner-create-note-from-task plan-page-p)
        (planner-create-note))))

-- 
Henrik S. Hansen     http://freecode.dk/~hsh/
Computer science (software engineering) student
Free Software Foundation member #1702 (http://member.fsf.org)