diff --git a/collects/mzlib/private/contract-arrow.ss b/collects/mzlib/private/contract-arrow.ss
index 7cba82ab28..c22f000708 100644
--- a/collects/mzlib/private/contract-arrow.ss
+++ b/collects/mzlib/private/contract-arrow.ss
@@ -60,7 +60,7 @@
                 procedure?))))]))
   
   (define-syntax (any stx)
-    (raise-syntax-error 'any "Use any out of an arrow contract" stx))
+    (raise-syntax-error 'any "use of any outside of an arrow contract" stx))
 
   ;; FIXME: need to pass in the name of the contract combinator.
   (define (build--> name doms doms-rest rngs rng-any? func)