diff --git a/pkgs/racket-test-core/tests/racket/cm.rktl b/pkgs/racket-test-core/tests/racket/cm.rktl
index 2cf7df8848..dd1caeb0eb 100644
--- a/pkgs/racket-test-core/tests/racket/cm.rktl
+++ b/pkgs/racket-test-core/tests/racket/cm.rktl
@@ -17,7 +17,7 @@
              )
   (delete-directory/files dir)
   (make-directory* dir)
-  (printf "wrorking in ~s\n" dir)
+  (printf "working in ~s\n" dir)
   (for-each (lambda (f)
               (printf "writing ~a\n" (car f))
               (with-output-to-file (build-path dir (car f))