fixed a bug which didn't allow random nicethigns to appear

cleanup
m455 2020-09-28 14:05:03 -04:00
parent 00bee864be
commit f7db69691f
1 changed files with 2 additions and 2 deletions

View File

@ -309,8 +309,8 @@
[(vector (== init-command)) (init)]
[(vector (== add-command) a) (add a)]
[(vector (== rm-command) a) (rm a)]
[(vector _ ...) (displayln-messages-ref 'error-incorrect-usage)]
[_ (random-message)]))
[_ (random-message)]
[(vector _ ...) (displayln-messages-ref 'error-incorrect-usage)]))
(define (main vectorof-args)
(process-args vectorof-args))