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

Removed the need to make a file when listing a random message

cleanup
m455 2020-06-15 15:05:10 -04:00
parent 327c0cd82f
commit cf003bbea4
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/nicethings.rkt
View File

@ -174,7 +174,6 @@
;; are multiple newline characters. This ensures ;; are multiple newline characters. This ensures
;; there is only one newline character. ;; there is only one newline character.
(define (add string) (define (add string)
(repair)
(let* ([string-no-newline (string-replace string "\n" "")] (let* ([string-no-newline (string-replace string "\n" "")]
[string-newline (string-append string-no-newline "\n")]) [string-newline (string-append string-no-newline "\n")])
(display-to-file string-newline (display-to-file string-newline