Fix hang when running Factor.app
parent
46fd14a405
commit
383c63021c
|
@ -109,7 +109,7 @@ M: module where* module-loc ;
|
||||||
"load.factor" path+ resource-path exists? ;
|
"load.factor" path+ resource-path exists? ;
|
||||||
|
|
||||||
: (available-modules) ( path -- )
|
: (available-modules) ( path -- )
|
||||||
dup directory [ path+ ] map-with
|
dup resource-path directory [ path+ ] map-with
|
||||||
dup [ module-dir? ] subset %
|
dup [ module-dir? ] subset %
|
||||||
[ (available-modules) ] each ;
|
[ (available-modules) ] each ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue