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

[factor.git] / extra / protocols / tftp / tftp.factor

diff --git a/extra/protocols/tftp/tftp.factor b/extra/protocols/tftp/tftp.factor
index 72a609389ca397955eccce37035987c301650218..cebd82aeb87e41c7c8c69ffb2873844e16af18fc 100644 (file)
--- a/extra/protocols/tftp/tftp.factor
+++ b/extra/protocols/tftp/tftp.factor
@@ -74,7 +74,7 @@ TUPLE: read-file path encoding block ;
 
 : handle-send-file ( bytes -- )
     "\0" split harvest first2 [ utf8 decode ] bi@
-    over { [ exists? ] [ file-info directory? not ] } 1&& [
+    over { [ file-exists? ] [ file-info directory? not ] } 1&& [
         "netascii" sequence= utf8 binary ? 0 read-file boa
         tftp-client get clients get set-at
         0 handle-send-file-next