added user message feedback for adding and removing items from lists
parent
cf7602a03d
commit
3f3d645f09
4
rodo.rkt
4
rodo.rkt
|
@ -79,7 +79,9 @@
|
|||
(d-hash-ref messages 'item-added-suffix)]
|
||||
|
||||
[(and (equal? args-length 2) (equal? (vector-member "remove" args) 0))
|
||||
(d-hash-ref messages 'item-removed-prefix)]
|
||||
(d-hash-ref messages 'item-removed-prefix)
|
||||
(d-vector-ref args 1)
|
||||
(d-hash-ref messages 'item-removed-suffix)]
|
||||
|
||||
[(and (equal? args-length 1) (equal? (vector-member "init" args) 0))
|
||||
(todo-list-exist?)]
|
||||
|
|
Loading…
Reference in New Issue