From 1d1afbfa7837d68fd30698527772c39337f7c269 Mon Sep 17 00:00:00 2001 From: m455 Date: Sat, 28 Apr 2018 09:56:30 -0400 Subject: [PATCH] items are now added as single items instead of converting to a list, when adding to the todo list --- util.rkt | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/util.rkt b/util.rkt index 4c26434..8c051d9 100644 --- a/util.rkt +++ b/util.rkt @@ -36,8 +36,7 @@ (define (number-list lst) (map string-append - (map number->string - (rest (range (length lst)))) + (map number->string (rest (range (length lst)))) (rest lst))) (define (indent-list) @@ -67,7 +66,7 @@ (define (add-item-to-file args) (let ([new-list (reverse - (append (list args) + (cons args (reverse (file->string-list path))))]) (display-to-file (string-join new-list "\n" #:after-last "\n")