X-Git-Url: https://jxself.org/git/?p=8sync.git;a=blobdiff_plain;f=8sync%2Fagenda.scm;h=8847dc931185a5424b2dd0e71f7d6f14c4875e7c;hp=f22134d0157ca1c01ff1d806922657a8a906cf02;hb=4118e3306b85390d0564960b92c9f56e202898d0;hpb=64099f71e0d685260289229a599a753923d2dc8f

diff --git a/8sync/agenda.scm b/8sync/agenda.scm
index f22134d..8847dc9 100644
--- a/8sync/agenda.scm
+++ b/8sync/agenda.scm
@@ -768,14 +768,12 @@ on suspendable ports."
       (begin body ...)))
 
 (define (wait-for-readable port)
-  (display "Waiting to read\n")
   (8sync-abort-to-prompt
    (make-async-request
     (lambda (kont)
       (make-read-request port (wrap (kont #f)))))))
 
 (define (wait-for-writable port)
-  (display "Waiting to write\n")
   (8sync-abort-to-prompt
    (make-async-request
     (lambda (kont)