diff --git a/extra/io/unix/files/files.factor b/extra/io/unix/files/files.factor index 69d4356d18..c1e4d319ce 100755 --- a/extra/io/unix/files/files.factor +++ b/extra/io/unix/files/files.factor @@ -51,8 +51,7 @@ M: unix touch-file ( path -- ) M: unix move-file ( from to -- ) [ normalize-path ] bi@ rename io-error ; -M: unix delete-file ( path -- ) - normalize-path unlink io-error ; +M: unix delete-file ( path -- ) normalize-path unlink-file ; M: unix make-directory ( path -- ) normalize-path OCT: 777 mkdir io-error ;