made my hash list more readable
parent
598ea19c9b
commit
3efc97a52e
2
rodo.rkt
2
rodo.rkt
|
@ -101,8 +101,10 @@
|
||||||
(if (check-for-folder)
|
(if (check-for-folder)
|
||||||
(d-hash-ref messages 'successfully-created)
|
(d-hash-ref messages 'successfully-created)
|
||||||
(d-hash-ref messages 'creation-error))]
|
(d-hash-ref messages 'creation-error))]
|
||||||
|
|
||||||
[(member user-input (hash-ref y/n 'no))
|
[(member user-input (hash-ref y/n 'no))
|
||||||
(d-hash-ref messages 'terminating)]
|
(d-hash-ref messages 'terminating)]
|
||||||
|
|
||||||
[else
|
[else
|
||||||
(prompt-user 'choose-y/n)])))
|
(prompt-user 'choose-y/n)])))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue