diff --git a/collects/racket/contract/private/arrow.rkt b/collects/racket/contract/private/arrow.rkt
index 19ff62c7f9..d99f55c7e3 100644
--- a/collects/racket/contract/private/arrow.rkt
+++ b/collects/racket/contract/private/arrow.rkt
@@ -392,7 +392,7 @@ v4 todo:
                (unless (memq req-kwd kwds)
                  (raise-blame-error blame val
                                     "expected keyword argument ~a"
-                                    (quote req-kwd))))
+                                    req-kwd)))
              (for ([k (in-list kwds)])
                (unless (memq k all-kwds)
                  (raise-blame-error blame val