diff --git a/extra/io/files/unique/unique.factor b/extra/io/files/unique/unique.factor
index 3a1c3c46b8..b39a14c7f5 100644
--- a/extra/io/files/unique/unique.factor
+++ b/extra/io/files/unique/unique.factor
@@ -29,7 +29,7 @@ PRIVATE>
     ] 3curry unique-retries retry ;
 
 : with-unique-file ( quot -- path )
-    >r f f make-unique-file r> with-stream ; inline
+    >r f f make-unique-file r> rot [ with-stream ] dip ; inline
 
 : with-temporary-file ( quot -- )
     with-unique-file delete-file ; inline
diff --git a/extra/io/unix/unix.factor b/extra/io/unix/unix.factor
index 11cdc0aa3b..b7111c5eac 100755
--- a/extra/io/unix/unix.factor
+++ b/extra/io/unix/unix.factor
@@ -1,5 +1,5 @@
 USING: io.unix.backend io.unix.files io.unix.sockets io.timeouts
-io.unix.launcher io.unix.mmap io.backend io.files.unique
+io.unix.launcher io.unix.mmap io.backend io.unix.files.unique
 combinators namespaces system vocabs.loader sequences ;
 
 "io.unix." os append require
diff --git a/extra/io/windows/files/unique/unique.factor b/extra/io/windows/files/unique/unique.factor
index 01e654751e..5f11bf6142 100644
--- a/extra/io/windows/files/unique/unique.factor
+++ b/extra/io/windows/files/unique/unique.factor
@@ -1,4 +1,4 @@
-USING: kernel system ;
+USING: kernel system io.files.unqiue io.files.unique.backend ;
 IN: io.windows.files.unique
 
 M: windows-io (make-unique-file) ( path -- stream )