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

M client.rkt

@@ 54,8 54,7 @@
   (void
    (post bulletin "/register"
          #:data
-         (jsexpr->string (hasheq 'input (bytes->hex-string
-                                         (integer->bytes point num-bytes #f #t))
+         (jsexpr->string (hasheq 'input (natural->hex-string point)
                                  'name username))))
 
   (display "retrieving peers...")