core: Add module type.
[mes.git] / scaffold / boot / 51-module.scm
index 17fe40f2d25c6dd5ad22ad4967268b4cf3484e4c..2457d75f1d3ada1e237bee3bf76e828820f42e52 100644 (file)
@@ -81,7 +81,7 @@
     (list 'load (list string-append %moduledir file)))
 
   (define (string->symbol s)
-    (core:lookup-symbol (core:car s)))
+    (list->symbol (core:car s)))
 
   (define (symbol->list s)
     (core:car s))