[elpa] externals/excorporate 1d94517 3/7: Retrieve diary entries after successful connection

[Thomas Fitzsimmons]

branch: externals/excorporate
commit 1d9451736a628b29e47840b6056bf80ab5a4b333
Author: Thomas Fitzsimmons <fitzsim@fitzsim.org>
Commit: Thomas Fitzsimmons <fitzsim@fitzsim.org>

    Retrieve diary entries after successful connection
    
    * excorporate.el: When entering :retrieving-data FSM state, call
    excorporate-diary-enable or excorporate-diary-disable conditional
    on excorporate-update-diary.
---
 excorporate.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/excorporate.el b/excorporate.el
index 2cc5b1b..7dd4dfa 100644
--- a/excorporate.el
+++ b/excorporate.el
@@ -579,7 +579,10 @@ the FSM should transition to on success."
     (plist-put state-data :server-version (exco--get-server-version wsdl))
     (fsm-debug-output "exco--fsm %s server version is %s"
                      identifier (exco-server-version identifier))
-    (message "Excorporate: Connection %S is ready" identifier))
+    (message "Excorporate: Connection %S is ready" identifier)
+    (if excorporate-update-diary
+       (excorporate-diary-enable)
+      (excorporate-diary-disable)))
   (list state-data nil))
 
 (define-state exco--fsm :retrieving-data