diff --git a/collects/typed-racket/utils/stxclass-util.rkt b/collects/typed-racket/utils/stxclass-util.rkt index ac24833197..ed6172dc5e 100644 --- a/collects/typed-racket/utils/stxclass-util.rkt +++ b/collects/typed-racket/utils/stxclass-util.rkt @@ -17,7 +17,7 @@ (string->symbol (string-append (symbol->string (syntax-e i)) "." - (symbol->string #'attr.datum))))]) + (symbol->string (syntax-e #'attr)))))]) (quasisyntax/loc stx (syntax-parse arg [#,i #:declare #,i pat #'#,get-i])))]))