remove (display)

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

diff --git a/eightsync/agenda.scm b/eightsync/agenda.scm
index d02ce9fbdb029330308b852ad77ea0b84c66e405..ba075361339f469d9047c1df0eefc3d9f36963a2 100644 (file)
--- a/eightsync/agenda.scm
+++ b/eightsync/agenda.scm
@@ -476,7 +476,6 @@ return the wrong thing via (%8sync) and trip themselves up."
 
 (define-syntax-rule (propagate-%async-exceptions body)
   (let ((body-result body))
-    (display "hi!\n")
     (if (wrapped-exception? body-result)
         (throw '%8sync-caught-error
                (wrapped-exception-key body-result)