as; call-in-module instead of calling in interface

Calling in module let's the user write any scheme code they want inside
the template.

1 files changed, 3 insertions, 3 deletions

diff --git a/src/as.scm b/src/as.scm
index b95c096..d309b8a 100644
--- a/src/as.scm
+++ b/src/as.scm
@@ -4,13 +4,13 @@
 
 (define (call-in-module thunk module)
   (let* ((curmod (current-module))
-         (_ (set-current-module (resolve-interface module)))
+         (_ (set-current-module (resolve-module module)))
          (v (thunk))
          (_ (set-current-module curmod)))
     v))
 
-(define (load-with-interface path module-name)
+(define (load-in-module path module-name)
   (call-in-module (lambda () (load path)) module-name))
 
 (define (as what file)
-  (load-with-interface file `(src as ,what)))
+  (load-in-module file `(src as ,what)))