NEW: For a prettier blog interface, see the Wordpress version!
~/.diary schedule
| 9:00 | 12:00 | Last rehearsal of presentation |
| 13:30 | 16:30 | Presentation and review |
Tasks
Priorities - A: high, B: medium, C: low; Status - _: unfinished, X: finished, C: cancelled, P: pending, o: in progress, >: delegated. Covey quadrants - Q1 & Q3: urgent, Q1 & Q2: important
| B | X | Pack the rest of my things |
| B | X | Correct 4th lesson typo (JapanCaseStudy) |
| B | X | Send copyright assignment for emacs-wiki/muse: E-Mail from Michael Olson (PlannerModeMaintenance) |
| B | X | Double-check presentation (JapanCaseStudy) |
| B | X | Fix Fujichan typo on process page (JapanCaseStudy) |
| B | X | Fix imakara typo on process page (JapanCaseStudy) |
| B | X | Fix lesson typo (JapanCaseStudy) |
| B | X | Merge patch for creating tasks with different status: E-Mail from Dirk Bernhardt (PlannerModeMaintenance) |
| B | X | Confirm that the new planner-find-file works (PlannerModeMaintenance) |
| B | X | Make sure default task status works (PlannerModeMaintenance) |
| B | X | Turn off task numbers by default: ../emacs/planner-config.el (PlannerModeMaintenance) |
| B | X | Think about making planner-default-page recognize Gnus groups: Chat with :johnsu01 on tolkien.freenode.net%23emacs (PlannerModeMaintenance) |
| B | X | Merge planner-edit-task advice for planner-timeclock (PlannerModeMaintenance) |
| B | X | Merge patch: E-Mail from John Sullivan (PlannerModeMaintenance) |
| B | X | Correct presentation (JapanCaseStudy) |
| B | C | Modify planner-copy-or-move-task so that it checks for duplicates: E-Mail from Wei-Hao Lin (PlannerModeMaintenance) |
Notes
1. Proof-of-concept code for autosensing task information: 10:10
Categories: None -- Permalink
(defun sacha/planner-create-task-from-buffer ()
(interactive)
(let ((annotation (run-hook-with-args-until-success 'planner-annotation-functions))
(default-text "")
task-text
plan
date
(case-fold-search t))
(setq planner-default-page
(if (and (planner-derived-mode-p 'planner-mode)
(planner-page-name)
(not (string-match planner-date-regexp
(planner-page-name))))
(planner-page-name)
planner-default-page))
;; INTERESTING CODE STARTS HERE
(save-excursion
(goto-char (point-min))
(when (and (re-search-forward "^+++" nil t)
(re-search-forward "^@@" nil t))
(setq default-text "Merge patch for ")))
(setq task-text (read-string "Describe task: "
default-text))
(when (or (string-match "planner" annotation)
(string-match "planner" task-text))
(setq planner-default-page "PlannerModeMaintenance"))
;; END INTERESTING CODE
(setq date (cond
;; Universal prefix means pick up from current page
((and current-prefix-arg
(derived-mode-p 'planner-mode)
(string-match planner-date-regexp (planner-page-name)))
(planner-page-name))
;; Date selected in calendar
((condition-case nil (calendar-cursor-to-date) (error nil))
(planner-date-to-filename (calendar-cursor-to-date)))
;; Prompt for date
(t (let ((planner-expand-name-favor-future-p
(or planner-expand-name-favor-future-p
planner-task-dates-favor-future-p)))
(planner-read-date)))))
(setq plan
(if (and current-prefix-arg (planner-derived-mode-p 'planner-mode)
(not (string-match planner-date-regexp (planner-page-name))))
;; Universal prefix means pick up from current page
(planner-page-name)
(planner-read-non-date-page
(planner-file-alist))))
(planner-create-task-from-buffer task-text date plan)))
2. sacha/planner-strip-task-numbers: 12:48
Categories: None -- Permalink
(defun sacha/planner-strip-task-numbers ()
(interactive)
(while (re-search-forward "^#.\\([0-9]+\\)\\s-+.\\s-+" nil t)
(replace-match "" t t nil 1))
(planner-align-tasks))
3. Waah. Bad day, code-wise: 12:50
Categories: None -- Permalink
A bit of code thrashing in planner.el as I... err... committed silly
mistakes. How embarrassing. I'm so, so sorry. I hope no one caught
planner in the middle of broken-ness.
4. FreeBSD installation plans: 22:02
Categories: None -- Permalink
I would like to install FreeBSD, just for kicks. I need a primary
partition free, though. That means I'll need to move my root partition
over, as everything else is on an extended partition.
I'd love to hear about any questions, comments, suggestions or links that you might have. Your comments will not be posted on this website immediately, but will be e-mailed to me first. You can use this form to get in touch with me, or e-mail me at sacha@sachachua.com .
