removed and fixed an unnecessary comma

main
m455 2018-05-18 23:36:46 -04:00
parent 1d1afbfa78
commit fb245b1b8f
1 changed files with 4 additions and 5 deletions

View File

@ -37,16 +37,15 @@
(define (number-list lst)
(map string-append
(map number->string (rest (range (length lst))))
(rest lst)))
(rest lst)))
(define (indent-list)
(lambda (lst)
(string-append ". " lst)))
(define (indent-list lst)
(string-append ". " lst))
(define (prettify-list)
(display
(string-join
(number-list (map (indent-list) (file->string-list path)))
(number-list (map indent-list (file->string-list path)))
"\n"
#:after-last "\n")))