diff --git a/collects/typed-scheme/types/utils.rkt b/collects/typed-scheme/types/utils.rkt
index af1b142a..b0ab2a87 100644
--- a/collects/typed-scheme/types/utils.rkt
+++ b/collects/typed-scheme/types/utils.rkt
@@ -166,7 +166,7 @@
 ;; error for unbound variables
 (define (lookup-fail e)
   (match (identifier-binding e)
-    ['lexical (tc-error/expr "untyped lexical variable ~a" (syntax-e e))]
+    ['lexical (tc-error/expr "untyped identifier ~a" (syntax-e e))]
     [#f (tc-error/expr "untyped top-level identifier ~a" (syntax-e e))]
     [(list _ _ nominal-source-mod nominal-source-id _ _ _)
      (let-values ([(x y) (module-path-index-split nominal-source-mod)])