[emacs-wiki-discuss] Re: Questions regarding planner-trunk

[Sacha Chua]

Silly me. Why do something fancy when something simple will do?
You already knew exactly what you needed! =D

Here's a quick one that switches between trunking rules:

(defvar michael-contexts '(("@Home" "Home")
                           ("@Work" "Work")
                           ("."     "")))
                           
(defvar michael-projects '(("Emacs.*" "Emacs")
                           ("Otherthings.*" "Other")))
                           
(defun michael-trunk-by-context ()
  "Trunk by `michael-contexts'."
  (interactive)
  (let ((planner-trunk-rule-list
         (list "." nil michael-contexts)))
    (planner-trunk-tasks)))

(defun michael-trunk-by-project ()
  "Trunk by `michael-projects'."
  (interactive)
  (let ((planner-trunk-rule-list
         (list "." nil michael-projects)))
    (planner-trunk-tasks)))

Hope that works for you!
-- 
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