diff --git a/TODO.org b/TODO.org
index cc9fb63..50db52f 100644
--- a/TODO.org
+++ b/TODO.org
@@ -13,8 +13,7 @@ You can create a Pre-Scheme module and switch into it with some effort:
 
 #+BEGIN_SRC scheme
 (use-modules (system base language))
-(set-module-name! (default-environment 'prescheme) '(prescheme-user))
-,module prescheme-user
+(set-current-module (default-environment 'prescheme))
 ,language prescheme
 #+END_SRC
 
diff --git a/language/prescheme/spec.scm b/language/prescheme/spec.scm
index 2a8d27b..44e58de 100644
--- a/language/prescheme/spec.scm
+++ b/language/prescheme/spec.scm
@@ -10,7 +10,7 @@
 
 (define (default-environment)
   (let ((m (make-module)))
-    (module-use! m (resolve-module '(language prescheme core)))
+    (module-use! m (resolve-interface '(language prescheme core)))
     m))
 
 (define-language prescheme