added a few hashes here and there
parent
7fc999e7e3
commit
a922007a58
16
rodo.rkt
16
rodo.rkt
|
@ -5,15 +5,15 @@
|
||||||
(displayln (hash-ref hash-list key)))
|
(displayln (hash-ref hash-list key)))
|
||||||
|
|
||||||
(define messages (hash
|
(define messages (hash
|
||||||
'incorrect-usage "For usage type `rodo -h` or `rodo --help`"
|
'incorrect-usage "> For usage type `rodo -h` or `rodo --help`"
|
||||||
'file-not-found "rodo has not been setup in your home directory\nWould you like to set it up now? [y/n]"
|
'file-not-found "> rodo has not been setup in your home directory\nWould you like to set it up now? [y/n]"
|
||||||
'file-exists ".rodo file exists"
|
'file-exists "> .rodo file exists"
|
||||||
'creating-file "> Creating .rodo file in your home directory..."
|
'creating-file "> Creating .rodo file in your home directory..."
|
||||||
'item-added "Item added"
|
'item-added "> Item added"
|
||||||
'item-removed "Item removed"
|
'item-removed "> Item removed"
|
||||||
'initializing "Initializing rodo in your home directory"
|
'initializing "> Initializing rodo in your home directory"
|
||||||
'terminating "Terminating rodo..."
|
'terminating "> Terminating rodo..."
|
||||||
'choose-y/n "Error: Please choose y or n"))
|
'choose-y/n "> Error: Please choose y or n"))
|
||||||
|
|
||||||
(define y/n (hash
|
(define y/n (hash
|
||||||
'yes '("yes" "Yes" "y" "Y")
|
'yes '("yes" "Yes" "y" "Y")
|
||||||
|
|
Loading…
Reference in New Issue