Re: Re: org-mode and appointments

[Richard G Riley <rileyrgdev@googlemail.com>]

Russell Adams <RLAdams@AdamsInfoServ.Com> writes:
v> Ok, so I've got appt working with org, along with Gnome popups with
> zenity to alert me of events.
>
> I wanted to aggregate the advice I'd received into one place, which
> could be posted later to wiki or worg, etc.
>
> I would welcome feedback, as I'm currently vetting this
> configuration. I'll post any updates if I find a problem.
>
> Thanks.

>
> ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
> ; For org appointment reminders
>
> ;; Get appointments for today
> (defun my-org-agenda-to-appt ()
>   (interactive)
>   (setq appt-time-msg-list nil)
>   (let ((org-deadline-warning-days 0))    ;; will be automatic in org 5.23
>         (org-agenda-to-appt)))
>
> ;; Run once, activate and schedule refresh
> (my-org-agenda-to-appt)
> (appt-activate t)
> (run-at-time "24:01" nil 'my-org-agenda-to-appt)
>
> ; 5 minute warnings
> (setq appt-message-warning-time '15)
> (setq appt-display-interval '5)
>
> ; Update appt each time agenda opened.
> (add-hook 'org-finalize-agenda-hook 'my-org-agenda-to-appt)
>
> ; Setup zenify, we tell appt to use window, and replace default function
> (setq appt-display-format 'window)
> (setq appt-disp-window-function (function my-appt-disp-window))
>
> (defun my-appt-disp-window (min-to-app new-time msg)                      
>   (save-window-excursion (shell-command (concat 
>     "/usr/bin/zenity --info --title='Appointment' --text='" 
>     msg
>     "' &"
>     ) nil nil)
> ))

I just tried it. Excellent.

BTW, one small problem - when I updated a schedule in the agenda
interface, the agenda file doesn't update in the buffer. Closing it and
reopening it showed the new time.