Add comment explaining appointments.

This commit is contained in:
Ivan Malison 2015-01-30 15:37:16 -08:00
parent c07d5e5955
commit d0f03bec22

View File

@ -617,11 +617,13 @@ The current directory is assumed to be the project's root otherwise."
("C-c C-S-t" . org-todo-force-notes))
:config
(progn
;; Enable appointment notifications.
(defadvice org-agenda-to-appt (before wickedcool activate)
"Clear the appt-time-msg-list."
(setq appt-time-msg-list nil))
(appt-activate)
(run-at-time "00:00" 60 'org-agenda-to-appt)
(defun org-archive-if (condition-function)
(if (funcall condition-function)
(org-archive-subtree)))