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

src/nicethings.rkt

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