whitespace

This commit is contained in:
Vivianne 2023-07-02 19:59:41 -07:00
parent a62e064341
commit 3830cdbed4

View file

@ -50,7 +50,6 @@
(define lobby-sref (string->ocapn-id addr)) (define lobby-sref (string->ocapn-id addr))
(define lobby ($ mycapn 'enliven lobby-sref)) (define lobby ($ mycapn 'enliven lobby-sref))
(define client-picker (spawn ^client-picker lobby ^game-controller)) (define client-picker (spawn ^client-picker lobby ^game-controller))
(on (<- lobby 'register-opponent user-name client-picker ($ client-picker 'get-sealed-pick)) (on (<- lobby 'register-opponent user-name client-picker ($ client-picker 'get-sealed-pick))
(lambda (_) (lambda (_)
(format #t "~a finished the game.\n" user-name))))) (format #t "~a finished the game.\n" user-name)))))