]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/git/git.factor
io.files: exists? -> file-exists? and rename primitive.
[factor.git] / extra / git / git.factor
index 570555828208b20aa496019da71380ff113e4ab0..80278f322ffbc303be650b0393d80881a7241cf7 100644 (file)
@@ -60,7 +60,7 @@ ERROR: expected-one-line lines ;
     [ first ] [ expected-one-line ] if ;
 
 : git-unpacked-object-exists? ( hash -- ? )
-    make-object-path exists? ;
+    make-object-path file-exists? ;
 
 TUPLE: index-entry ctime mtime dev ino mode uid gid size sha1 flags name ;
 CONSTRUCTOR: <index-entry> index-entry ( ctime mtime dev ino mode uid gid size sha1 flags name -- obj ) ;