Jim Ottaway <[EMAIL PROTECTED]> writes:
>>>>>> Hsiu-Khuern Tang <[EMAIL PROTECTED]> writes:
>
>> I have the following lines in .emacs:
>> (require 'planner)
>> (require 'planner-deadline)
>> (require 'planner-appt)
>> (planner-appt-use-tasks)
>> (planner-appt-insinuate)
>> (planner-appt-calendar-insinuate)
>> (setq planner-appt-task-use-appointments-section-flag t)
>
>> I'm trying to use task-based appointments. I noticed the following
>> error when adding a task that has both an appointment and a deadline,
>> e.g., #B _ @16:00 do this {{Deadline: 2007.11.23 - 9 days}} (TaskPool)
>
>> Under Emacs22:
>> Wrote /home/htang/.planner/TaskPool.muse
>> abbreviate-file-name: Lisp nesting exceeds `max-lisp-eval-depth'
>
>> Under Emacs23:
>> Wrote /home/htang/.planner/TaskPool.muse
>> file-truename: Variable binding depth exceeds max-specpdl-size
>
>> The appointment does not show up under the Schedule section (or anywhere
>> else).
>
> This patch might fix it:
>
> --- orig/planner-appt.el
> +++ mod/planner-appt.el
> @@ -788,14 +788,10 @@
> "Extract appointment time and text from the DESCRIPTION.
> Return a list (text time). If the task is not an
> appointment, time defaults to nil."
> - (or (gethash description --planner-appt-task-cache)
> - (puthash
> - description
> - (if (string-match planner-appt-task-regexp description)
> - (list (substring description (match-end 0))
> - (substring description (match-beginning 1) (match-end 1)))
> - (list description nil))
> - --planner-appt-task-cache)))
> + (if (string-match planner-appt-task-regexp description)
> + (list (substring description (match-end 0))
> + (substring description (match-beginning 1) (match-end 1)))
> + (list description nil)))
>
> (defun planner-appt-task-nagging-p (description)
> "Return non-nil if task DESCRIPTION is a nagging appointment."
>
>
> Regards,
Hi, i had the same error (without using deadline)
when i was trying to use planner-zoom, (go to the next day or precedent
day)
but with this patch it seems ok.
i patch planner-appt, recompile the planner directory,
and set:
(setq max-lisp-eval-depth '40000)
(setq max-specpdl-size '100000)
My planner-day-page-template is like that:
(setq planner-day-page-template
"* Schedule\n\n\n* Tasks\n\n\n* Ledger\n\n** Pending Transactions\n\n*
Diary\n\n\n* Favoris\n \
\[[lisp:planner-notes-index-weeks][Voir Semaine(n)]]\n \
\[[~/finance/ledger.dat][Voir Compta]]\n \
\[[lisp:/(emms-lastfm-radio-global-tag \"rock\")][Lastfm Rock Music]]\n \
\[[lisp:/(emms-lastfm-radio-global-tag \"pop\")][Lastfm Pop Music]]\n\n*
Notes\n")
Thanks for the patch
--
A + Thierry
pubkey: http://pgp.mit.edu/
_______________________________________________
Planner-el-discuss mailing list
[email protected]
https://mail.gna.org/listinfo/planner-el-discuss
