agenda: Rename start-agenda to run-agenda.

[8sync.git] / 8sync / agenda.scm

diff --git a/8sync/agenda.scm b/8sync/agenda.scm
index 3aa43da1eeec85dee0f6d9f9d58abe1d6084b558..1d2515607b7d932598b3f3e7c9742f74fbfcbd21 100644 (file)
--- a/8sync/agenda.scm
+++ b/8sync/agenda.scm
@@ -62,7 +62,7 @@
             stop-on-nothing-to-do
 
             %current-agenda-prompt
-            start-agenda agenda-run-once!))
+            run-agenda agenda-run-once!))
 
 \f
 ;;; Agenda definition
@@ -553,10 +553,10 @@ on suspendable ports."
        (= 0 (hash-count (const #t) (agenda-write-port-map agenda)))))
 
 
-(define* (start-agenda agenda
-                       #:key (stop-condition stop-on-nothing-to-do)
-                       ;; For live hacking madness, etc
-                       (post-run-hook #f))
+(define* (run-agenda agenda
+                     #:key (stop-condition stop-on-nothing-to-do)
+                     ;; For live hacking madness, etc
+                     (post-run-hook #f))
   ;; TODO: Document fields
   "Start up the AGENDA"
   (install-suspendable-ports!)