Browse Source

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

cleanup
Jesse Laprade 8 months ago
parent
commit
f7db69691f
  1. 4
      src/nicethings.rkt

4
src/nicethings.rkt

@ -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))

Loading…
Cancel
Save