From 581af4a67508b7e0081d8a09c0106e1b9ccd23ba Mon Sep 17 00:00:00 2001
From: David Florness <david@florness.com>
Date: Tue, 10 Mar 2020 13:28:41 -0600
Subject: [PATCH] Helpful log message for clients waiting for a token

---
 client.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/client.rkt b/client.rkt
index 247cd58..391bd00 100644
--- a/client.rkt
+++ b/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
-- 
2.38.4