1 files changed, 3 insertions(+), 0 deletions(-)
M bulletin.rkt
M bulletin.rkt => bulletin.rkt +3 -0
@@ 227,6 227,9 @@
['close
(transition 'closed)
(reset)]
+ ['register
+ (transition 'registering)
+ (reset)]
[else (displayln "unknown command")])
(when (not (equal? line ""))
(add-history line))