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

M client.rkt

@@ 72,8 72,6 @@
          [point    : Integer]
          [bulletin : requester]
          [token    : JSExpr])
-  (newline)
-
   (display "retrieving candidates...")
   (define candidates (cast (json-response-body
                             (retry-request (get bulletin "/candidates")))


@@ 321,6 319,8 @@
                          (displayln (format "Login refused: ~a"
                                             (exn-message ex)))
                          (exit))])
+        (newline)
+        (displayln "retrieving token...")
         (json-response-body
          (post bulletin "/register"
                #:data