diff --git a/extra/io/unix/backend/backend.factor b/extra/io/unix/backend/backend.factor
index d43350e425..06fe830365 100755
--- a/extra/io/unix/backend/backend.factor
+++ b/extra/io/unix/backend/backend.factor
@@ -93,7 +93,7 @@ M: io-timeout summary drop "I/O operation timed out" ;
     [
         >r handle>> r> wait-for-fd
         [ io-timeout ] when
-    ] with-timeout ;
+    ] curry with-timeout ;
 
 ! Some general stuff
 : file-mode OCT: 0666 ;