[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Orgmode] Re: org-mode and appointments
From: |
Richard G Riley |
Subject: |
Re: [Orgmode] Re: org-mode and appointments |
Date: |
Sun, 02 Mar 2008 18:51:42 +0100 |
User-agent: |
Gnus/5.110007 (No Gnus v0.7) Emacs/22.1 (gnu/linux) |
Russell Adams <address@hidden> 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.