Fix hang when running Factor.app

2006-11-22 17:42:52 +00:00 · 2006-11-22 17:42:52 +00:00 · 383c63021c
parent 46fd14a405
commit 383c63021c
1 changed files with 1 additions and 1 deletions
--- a/library/modules.factor
+++ b/library/modules.factor
@ -109,7 +109,7 @@ M: module where* module-loc ;
    "load.factor" path+ resource-path exists? ;

 : (available-modules) ( path -- )
-    dup directory [ path+ ] map-with
+    dup resource-path directory [ path+ ] map-with
    dup [ module-dir? ] subset %
    [ (available-modules) ] each ;