From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 16 Jan 2018 20:24:42 +0000 (-0800)
Subject: fix indentation of appt integration
X-Git-Url: https://git.donarmstrong.com/?p=lib.git;a=commitdiff_plain;h=7936c286d2b7b4f12d6af2824ec62d5186a32703

fix indentation of appt integration
---

diff --git a/emacs_el/configuration/don-configuration.org b/emacs_el/configuration/don-configuration.org
index 407dde7..1f38321 100644
--- a/emacs_el/configuration/don-configuration.org
+++ b/emacs_el/configuration/don-configuration.org
@@ -1815,7 +1815,7 @@ From http://julien.danjou.info/projects/emacs-packages#rainbow-mode, this colori
     (defadvice org-save-all-org-buffers (after org-save-all-org-buffers-add-appts)
       "Re-add appts after saving all org buffers"
       (my/org-agenda-to-appt))
-                                          ; Display appointments as a window manager notification
+    ;; Display appointments as a window manager notification
     (setq appt-disp-window-function 'my/appt-display)
     (setq appt-delete-window-function (lambda () t))
   
@@ -1823,10 +1823,12 @@ From http://julien.danjou.info/projects/emacs-packages#rainbow-mode, this colori
   
     (defun my/appt-display (min-to-app new-time msg)
       (if (atom min-to-app)
-          (start-process "my/appt-notification-app" nil my/appt-notification-app min-to-app msg)
-        (dolist (i (number-sequence 0 (1- (length min-to-app))))
-          (start-process "my/appt-notification-app" nil my/appt-notification-app
-                         (nth i min-to-app) (nth i msg))))))
+      (start-process "my/appt-notification-app" nil my/appt-notification-app min-to-app msg)
+    (dolist (i (number-sequence 0 (1- (length min-to-app))))
+      (start-process "my/appt-notification-app" nil my/appt-notification-app
+                     (nth i min-to-app) (nth i msg))))
+      )
+    )
 
 
 #+END_SRC