tildetown
/
rodo
2
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
util.rkt
View File

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