]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/ftp/server/server.factor
io.files: exists? -> file-exists? and rename primitive.
[factor.git] / basis / ftp / server / server.factor
index 72f1ad542028654ee74ff7eee24609b14f632144..65ec841e9ee9818f87baa3a417ef7900fbfab642 100644 (file)
@@ -66,11 +66,11 @@ C: <ftp-disconnect> ftp-disconnect
     resolve-symlinks server get serving-directory>> head? ;
 
 : can-serve-directory? ( path -- ? )
-    { [ exists? ] [ file-info directory? ] [ serving? ] } 1&& ;
+    { [ file-exists? ] [ file-info directory? ] [ serving? ] } 1&& ;
 
 : can-serve-file? ( path -- ? )
     {
-        [ exists? ]
+        [ file-exists? ]
         [ file-info regular-file? ]
         [ serving? ]
     } 1&& ;