diff --git a/collects/typed-racket/base-env/base-env.rkt b/collects/typed-racket/base-env/base-env.rkt
index ec0f00dd..3b679464 100644
--- a/collects/typed-racket/base-env/base-env.rkt
+++ b/collects/typed-racket/base-env/base-env.rkt
@@ -2108,8 +2108,8 @@
 [logger-name (-> -Logger (-opt Sym))]
 [current-logger (-Param -Logger -Logger)]
 
-[log-message (Un (-> -Logger -Log-Level -String Univ -Void)
-                 (-> -Logger -Log-Level (Un (-val #f) -Symbol) -String Univ -Void))]
+[log-message (cl->* (-> -Logger -Log-Level -String Univ -Void)
+                    (-> -Logger -Log-Level (Un (-val #f) -Symbol) -String Univ -Void))]
 [log-level? (-> -Logger -Log-Level  B)]
 
 [log-receiver? (make-pred-ty -Log-Receiver)]