From 33097d6396486c5b7d9d5b007844888892e99f01 Mon Sep 17 00:00:00 2001 From: m455 Date: Thu, 15 Apr 2021 21:35:44 -0400 Subject: [PATCH] added check for exact numbers --- src/nicethings.rkt | 1 + 1 file changed, 1 insertion(+) diff --git a/src/nicethings.rkt b/src/nicethings.rkt index 5160b31..de9bab6 100644 --- a/src/nicethings.rkt +++ b/src/nicethings.rkt @@ -165,6 +165,7 @@ (define (rm/remove-nicething item-number) (let ([listof-items (file->lines program-path)]) (if (and (not (null? listof-items)) + (exact? item-number) (>= item-number 0) (< item-number (length listof-items))) (let* ([item-to-remove (list-ref listof-items item-number)]