[emacs-wiki-discuss] Re: Automatically scheduling tasks onto TaskPool

[Sacha Chua]

Sacha Chua <address@hidden> writes:

> ----------------------------------------------------------------
> (defadvice planner-create-task-from-buffer (before paul activate)
>   "Automatically schedule task onto TaskPool as well as other projects."
>   (if plan-page
>       (unless (string-match plan-page "TaskPool")
>         (setq plan-page (concat plan-page planner-multi-separator 
> "TaskPool")))
>     (setq plan-page "TaskPool")))
> ----------------------------------------------------------------

Heh, whoops, that should be

(defadvice planner-create-task-from-buffer (before paul activate)
  "Automatically schedule task onto TaskPool as well as other projects."
  (if plan-page
      (unless (string-match "TaskPool" plan-page)
        (setq plan-page (concat plan-page planner-multi-separator "TaskPool")))
    (setq plan-page "TaskPool")))

I keep reversing the arguments for string-match... Silly. <sheepish
grin> Good thing planner-multi is smart.
-- 
Sacha Chua <address@hidden> - open source geekette
http://sacha.free.net.ph/ - PGP Key ID: 0xE7FDF77C
interests: emacs, gnu/linux, personal information management, CS ed
sachac on irc.freenode.net#emacs . YM: sachachua83