From: Don Armstrong <don@donarmstrong.com>
Date: Wed, 30 Nov 2016 16:44:48 +0000 (-0600)
Subject: add automatic reminders for appointments
X-Git-Url: https://git.donarmstrong.com/?p=lib.git;a=commitdiff_plain;h=2047a66806d42b552a96b8495289e55537aed200

add automatic reminders for appointments
---

diff --git a/emacs_el/configuration/org-mode-configuration.el b/emacs_el/configuration/org-mode-configuration.el
index 8e434d1..bd1d036 100644
--- a/emacs_el/configuration/org-mode-configuration.el
+++ b/emacs_el/configuration/org-mode-configuration.el
@@ -122,6 +122,13 @@
 (setq org-global-properties '(("Effort_ALL 0 0:10 0:30 1:00 2:00 3:00 4:00 5:00 6:00 7:00")))
 (setq org-columns-default-format "%40ITEM(Task) %6Effort{:} %CLOCKSUM %PRIORITY %TODO %13SCHEDULED %13DEADLINE %TAGS")
 
+;; add automatic reminders for appointments
+(defadvice  org-agenda-redo (after org-agenda-redo-add-appts)
+  "Pressing `r' on the agenda will also add appointments."
+  (progn 
+    (setq appt-time-msg-list nil)
+    (org-agenda-to-appt)))
+
 (setq org-default-notes-file "~/projects/org-notes/notes.org")
 (setq org-id-link-to-org-use-id t)
 (setq org-capture-templates  ;; mail-specific note template, identified by "m"