April 16, 2004

Scheduling tasks in the diary

April 16, 2004 - Categories: emacs
(defun sacha/planner-diary-schedule-task (time)
  "Add a diary entry for the current task at TIME."
  (interactive "MTime: ")
        (let ((info (planner-current-task-info)))
           (planner-task-date info)
           (concat time " | " (planner-task-description info) "")))))))

(defun sacha/planner-diary-add-entry (date text &optional annotation)
  "Prompt for a diary entry to add to `diary-file'."
    (if (or current-prefix-arg
            (not (string-match planner-date-regexp (planner-page-name))))
     "Diary entry: ")))
        (let ((cal-date (planner-filename-to-calendar-date date)))
          (calendar-date-string cal-date t t))
        " " text
        (or annotation
            (let ((annotation (run-hook-with-args-until-success
              (if annotation
                  (concat " " annotation)
      (planner-goto date)


Got my FSF papers back!

April 16, 2004 - Categories: -Uncategorized

I’m now an official contributor and my part of ERC can be merged into GNU Emacs eventually. Yay!