diff --git a/collects/s-exp/lang/reader.ss b/collects/s-exp/lang/reader.ss
index 88cd4f66e0..110b671e21 100644
--- a/collects/s-exp/lang/reader.ss
+++ b/collects/s-exp/lang/reader.ss
@@ -1,8 +1 @@
-(module reader syntax/module-reader
-  -ignored-
-  #:wrapper2
-  (lambda (in rd stx?)
-    (let* ([mod* (rd in)]
-           [mod  (if stx? (syntax->list mod*) mod*)]
-           [mod  `(,(car mod) ,(cadr mod) ,@(cdddr mod))])
-      (if stx? (datum->syntax mod* mod mod*) mod))))
+(module reader syntax/module-reader #:language read)