From a6fb9c3d291d5e4c28f7514c77fad3feecdb8380 Mon Sep 17 00:00:00 2001 From: m455 Date: Sat, 21 Apr 2018 09:11:02 -0400 Subject: [PATCH] stopped user from being able to remove a number that isn't in the list --- args.rkt | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/args.rkt b/args.rkt index 2c96e10..156a62c 100644 --- a/args.rkt +++ b/args.rkt @@ -1,6 +1,7 @@ #lang racket/base (require racket/vector + racket/list "config.rkt" "init.rkt" "util.rkt" @@ -27,7 +28,9 @@ [(and (equal? args-length 2) - (equal? (vector-member remove-command args) 0)) + (equal? (vector-member remove-command args) 0) + (not (equal? (vector-member "0" args) 1)) + (vector-member (vector-ref args 1) (list->vector (map number->string (range (length (file->string-list path))))))) (remove-item args)] [(and