1 files changed, 2 insertions(+), 2 deletions(-)

M client.rkt

@@ 83,6 83,7 @@
                       (json-response-body
                        (retry-request (get bulletin "/peer-count")))
                       Positive-Integer))
+  (newline)
 
   (displayln "Candidates:")
   (for ([i (in-naturals)]


@@ 135,7 136,7 @@
                                  #t)))
                 #t))))))
 
-  (display "committing poly...")
+  (displayln "committing poly...")
   (define poly (random-poly
                 (cast (sub1 peer-count) Natural)
                 vote))


@@ 150,7 151,6 @@
            (bytes->hex-string
             (merkle-node-hsh
              (merkle-tree-root (poly-merkle poly))))))))
-  (newline)
 
   (display "retrieving peers...")
   (define peer-inputs