io.directories.search: link-info better than file-info because file-info can crash...

diff --git a/basis/io/directories/search/search.factor b/basis/io/directories/search/search.factor
index 6d507f4b9e477b77c346921b162a7f405a78dbc6..7ea746940305d6825ddb312a5bfa621fb19aed6c 100644 (file)
--- a/basis/io/directories/search/search.factor
+++ b/basis/io/directories/search/search.factor
@@ -136,4 +136,4 @@ ERROR: sequence-expected obj ;
     1array find-files-by-extensions ;
 
 : find-files-larger-than ( path size -- seq )
-    '[ file-info size>> _ > ] find-files ;
+    '[ link-info size>> _ > ] find-files ;