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

[factor.git] / extra / webapps / imagebin / imagebin.factor

diff --git a/extra/webapps/imagebin/imagebin.factor b/extra/webapps/imagebin/imagebin.factor
index e9fc2c742fc20c986e84dbc18d136d1076c234fa..44027b88ae028344f48ac5f2ef63a2efd9abc984 100644 (file)
--- a/extra/webapps/imagebin/imagebin.factor
+++ b/extra/webapps/imagebin/imagebin.factor
@@ -20,7 +20,7 @@ M: imagebin call-responder*
     [ imagebin set ] [ call-next-method ] bi ;
 
 : move-image ( mime-file -- )
-    [ next-image-path dup exists? ] [ drop ] while
+    [ next-image-path dup file-exists? ] [ drop ] while
     [ [ temporary-path>> ] dip move-file ]
     [ [ filename>> ] dip ".txt" append utf8 set-file-contents ] 2bi ;