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

[factor.git] / basis / http / server / static / static.factor

diff --git a/basis/http/server/static/static.factor b/basis/http/server/static/static.factor
index c05c6f1d5d1ca6e1e50d1d134b06e2a3806c10ce..d594bfd35ee6c9825b3177ac34f41b299c5e789a 100644 (file)
--- a/basis/http/server/static/static.factor
+++ b/basis/http/server/static/static.factor
@@ -160,7 +160,7 @@ TUPLE: file-responder root hook special index-names allow-listings ;
 
 : find-index ( filename -- path )
     file-responder get index-names>>
-    [ append-path dup exists? [ drop f ] unless ] with map-find
+    [ append-path dup file-exists? [ drop f ] unless ] with map-find
     drop ;
 
 : serve-directory ( filename -- response )
@@ -173,7 +173,7 @@ TUPLE: file-responder root hook special index-names allow-listings ;
     ] if ;
 
 : serve-object ( filename -- response )
-    serving-path dup exists?
+    serving-path dup file-exists?
     [ dup file-info directory? [ serve-directory ] [ serve-file ] if ]
     [ drop <404> ]
     if ;