Improve style of setup.rkt script

Co-authored-by: Jimmy McNutt <jmcnuttc@gmail.com>
This commit is contained in:
LordMZTE 2023-05-25 14:44:04 +02:00
parent abd14e0b34
commit d6e65f12b4
Signed by: LordMZTE
GPG key ID: B64802DC33A64FF6

View file

@ -27,20 +27,20 @@
(current-directory script-dir))
;; Verify valid verb
(when (not (for/or ([valid-verb verbs])
(symbol=? valid-verb verb)))
(error "Invalid verb" verb))
(unless (for/or ([valid-verb verbs])
(symbol=? valid-verb verb))
(raise-user-error "Invalid verb" verb))
(case verb
[(install-scripts)
(match verb
['install-scripts
(local-require "setup/commands/install-scripts.rkt")
(run)]
[(install-lsps-paru)
['install-lsps-paru
(local-require "setup/commands/install-lsps-paru.rkt")
(run)]
[(setup-nvim-config)
['setup-nvim-config
(local-require "setup/commands/setup-nvim-config.rkt")
(run)]
[(confgen)
['confgen
(local-require "setup/commands/confgen.rkt")
(run)])