diff --git a/collects/racket/gui.rkt b/collects/racket/gui.rkt
new file mode 100644
index 00000000..58531f47
--- /dev/null
+++ b/collects/racket/gui.rkt
@@ -0,0 +1,4 @@
+(module gui racket
+  (require racket/gui/base)
+  (provide (all-from-out racket)
+           (all-from-out racket/gui/base)))
diff --git a/collects/scheme/gui/base.ss b/collects/racket/gui/base.rkt
similarity index 100%
rename from collects/scheme/gui/base.ss
rename to collects/racket/gui/base.rkt
diff --git a/collects/scheme/gui/init.ss b/collects/racket/gui/init.rkt
similarity index 100%
rename from collects/scheme/gui/init.ss
rename to collects/racket/gui/init.rkt
diff --git a/collects/racket/gui/lang/reader.ss b/collects/racket/gui/lang/reader.ss
new file mode 100644
index 00000000..48151efe
--- /dev/null
+++ b/collects/racket/gui/lang/reader.ss
@@ -0,0 +1,2 @@
+#lang s-exp syntax/module-reader
+racket/gui
diff --git a/collects/scheme/gui.ss b/collects/scheme/gui.rkt
similarity index 100%
rename from collects/scheme/gui.ss
rename to collects/scheme/gui.rkt
diff --git a/collects/scheme/gui/base.rkt b/collects/scheme/gui/base.rkt
new file mode 100644
index 00000000..25deaa37
--- /dev/null
+++ b/collects/scheme/gui/base.rkt
@@ -0,0 +1,2 @@
+#lang scheme/private/provider
+racket/gui/base
diff --git a/collects/scheme/gui/init.rkt b/collects/scheme/gui/init.rkt
new file mode 100644
index 00000000..c5670403
--- /dev/null
+++ b/collects/scheme/gui/init.rkt
@@ -0,0 +1,2 @@
+#lang scheme/private/provider
+racket/gui/init