diff --git a/pkgs/rackunit-pkgs/rackunit-lib/rackunit/private/format.rkt b/pkgs/rackunit-pkgs/rackunit-lib/rackunit/private/format.rkt
index f17ae37d3c..d6102a4f99 100644
--- a/pkgs/rackunit-pkgs/rackunit-lib/rackunit/private/format.rkt
+++ b/pkgs/rackunit-pkgs/rackunit-lib/rackunit/private/format.rkt
@@ -39,12 +39,11 @@
    [else
     (substring s 0 n)]))
 
-(define (display-check-info-name-value name value [value-printer write])
+(define (display-check-info-name-value name value [value-printer (lambda (x) (write x) (newline))])
   (display (string-pad-right
             (string-append (symbol->string name) ": ")
             name-width))
-  (value-printer value)
-  (newline))
+  (value-printer value))
 
 (define display-check-info
   (match-lambda [(struct check-info (name value))
diff --git a/pkgs/rackunit-pkgs/rackunit-lib/rackunit/text-ui.rkt b/pkgs/rackunit-pkgs/rackunit-lib/rackunit/text-ui.rkt
index b0935af3ab..b1f1493827 100644
--- a/pkgs/rackunit-pkgs/rackunit-lib/rackunit/text-ui.rkt
+++ b/pkgs/rackunit-pkgs/rackunit-lib/rackunit/text-ui.rkt
@@ -141,7 +141,7 @@
          (trim-current-directory
           (location->string
            (check-info-value info)))
-         display)]
+         displayln)]
        [(check-params? info)
         (display-check-info-name-value
          'params