Jim Ottaway wrote:
>>>>>> Xin Shi <[EMAIL PROTECTED]> writes:
>>>>>>
>
>
>> Hi,
>> Are there any functions that can put a link for the previous valid and
>> next valid day page? It would be very useful in viewing days in
>> sequence. For example, there are three files 2007.10.18.muse,
>> 2007.10.21.muse, and 2007.10.25.muse. So that in the 2007.10.21.muse:
>> (Here the function name is fake).
>>
>
>
>> [[<lisp> (planner-find-previous-valid-day)</lisp>]] will generate the
>> link of [[2007.10.18]].
>>
>
>
>> As the planner-calendar package can already generate the valid day
>> pages, it might be possible to do that.
>>
>
> You could use planner-get-next-existing-day and
> planner-get-previous-existing-day, for example
>
> (planner-get-next-existing-day (planner-page-name))
>
> will return next planner file that actually exists following today's
> one.
>
>
>
> Regards,
>
I have 2007.10.18.muse, 2007.10.19.muse, and 2007.10.22.muse, but if I
do this
(planner-get-previous-existing-day "2007.10.19")
What I got is the error:
=================================================
Debugger entered--Lisp error: (error "No previous planner file")
signal(error ("No previous planner file"))
error("No previous planner file")
(if result (if (listp date) (planner-filename-to-calendar-date result)
result) (error "No previous planner file"))
(let ((newdate ...) (result nil)) (mapcar (lambda ... ...) (mapcar ...
...)) (if result (if ... ... result) (error "No previous planner file")))
planner-get-previous-existing-day("2007.10.19")
eval((planner-get-previous-existing-day "2007.10.19"))
eval-last-sexp-1(nil)
eval-last-sexp(nil)
call-interactively(eval-last-sexp)
recursive-edit()
byte-code("Æ!?Ç ?È !?\n??
Thanks !
Xin
_______________________________________________
Planner-el-discuss mailing list
[email protected]
https://mail.gna.org/listinfo/planner-el-discuss
