From 3f3d645f0929fa07d30bfca282a2fc1867a8e54d Mon Sep 17 00:00:00 2001 From: m455 Date: Thu, 5 Apr 2018 20:54:23 -0400 Subject: [PATCH] added user message feedback for adding and removing items from lists --- rodo.rkt | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/rodo.rkt b/rodo.rkt index c469beb..167a546 100755 --- a/rodo.rkt +++ b/rodo.rkt @@ -30,7 +30,7 @@ 'item-added-suffix " to list\n" 'item-removed-prefix "> Removed " - 'item-removed-suffix "from list\n" + 'item-removed-suffix " from list\n" 'terminating (string-append "> Exiting " program-name "...\n"))) @@ -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?)]