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

M client.rkt

@@ 289,7 289,9 @@
   (define point (gen))
 
   (define bulletin
-    (update-port (update-host json-requester "localhost") 1984))
+    (update-port (update-host json-requester
+                              (readline "Bulletin host: "))
+                 1984))
 
   (displayln "waiting for the election to open...")
   (wait-for-open-election bulletin)