io.files: exists? -> file-exists? and rename primitive.

[factor.git] / extra / terminfo / terminfo.factor

diff --git a/extra/terminfo/terminfo.factor b/extra/terminfo/terminfo.factor
index 156ca33be1c7d5ef8b077c5985dd5c9720c99f80..f2c6ff57d1c7865d8e372c7f2181dc728e3af25b 100644 (file)
--- a/extra/terminfo/terminfo.factor
+++ b/extra/terminfo/terminfo.factor
@@ -85,7 +85,7 @@ M: linux terminfo-relative-path ( name -- path )
 
 : terminfo-path ( name -- path )
     terminfo-relative-path TERMINFO-DIRS [ swap append-path ] with map
-    [ exists? ] find nip ;
+    [ file-exists? ] find nip ;
 
 : terminfo-names-for-path ( path -- names )
     [
@@ -94,7 +94,7 @@ M: linux terminfo-relative-path ( name -- path )
     ] with-directory-entries ;
 
 MEMO: terminfo-names ( -- names )
-    TERMINFO-DIRS [ exists? ] filter
+    TERMINFO-DIRS [ file-exists? ] filter
     [ terminfo-names-for-path ] map concat ;
 
 <PRIVATE