diff --git a/basis/io/directories/hierarchy/hierarchy.factor b/basis/io/directories/hierarchy/hierarchy.factor
index d39fbc39a2..52e2dd4cc6 100644
--- a/basis/io/directories/hierarchy/hierarchy.factor
+++ b/basis/io/directories/hierarchy/hierarchy.factor
@@ -34,7 +34,7 @@ DEFER: copy-tree-into
     {
         { +symbolic-link+ [ copy-link ] }
         { +directory+ [ '[ [ _ copy-tree-into ] each ] with-directory-files ] }
-        [ drop copy-file-and-info ]
+        [ drop copy-file ]
     } case ;
 
 : copy-tree-into ( from to -- )
diff --git a/basis/io/directories/unix/unix.factor b/basis/io/directories/unix/unix.factor
index cbfd344e7b..b4ebc3bc7e 100644
--- a/basis/io/directories/unix/unix.factor
+++ b/basis/io/directories/unix/unix.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors alien.c-types alien.data alien.strings
 combinators continuations destructors fry io io.backend
-io.directories io.encodings.binary
+io.directories io.encodings.binary io.files.info.unix
 io.encodings.utf8 io.files io.pathnames io.files.types kernel
 math.bitwise sequences system unix unix.stat vocabs.loader
 classes.struct unix.ffi literals libc vocabs
diff --git a/basis/io/files/info/info.factor b/basis/io/files/info/info.factor
index 3e832e6d0b..99d0046386 100644
--- a/basis/io/files/info/info.factor
+++ b/basis/io/files/info/info.factor
@@ -1,7 +1,7 @@
 ! Copyright (C) 2008 Doug Coleman, Eduardo Cavazos.
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors kernel system sequences combinators
-vocabs vocabs.loader io.files.types io.directories math ;
+vocabs vocabs.loader io.files.types math ;
 IN: io.files.info
 
 ! File info
@@ -29,7 +29,3 @@ HOOK: file-system-info os ( path -- file-system-info )
     { [ os unix? ] [ "io.files.info.unix" ] }
     { [ os windows? ] [ "io.files.info.windows" ] }
 } cond require
-
-HOOK: copy-file-and-info os ( from to -- )
-
-M: object copy-file-and-info copy-file ;
diff --git a/basis/io/files/info/unix/unix.factor b/basis/io/files/info/unix/unix.factor
index 8b1701cfea..6287ee9d43 100644
--- a/basis/io/files/info/unix/unix.factor
+++ b/basis/io/files/info/unix/unix.factor
@@ -2,7 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors alien.c-types alien.data arrays calendar
 calendar.unix classes.struct combinators
-combinators.short-circuit io.backend io.directories
+combinators.short-circuit io.backend
 io.files.info io.files.types kernel literals math math.bitwise
 sequences specialized-arrays strings system unix unix.ffi
 unix.groups unix.stat unix.time unix.users vocabs ;
@@ -185,9 +185,6 @@ CONSTANT: ALL-EXECUTE   0o0000111
 : remove-file-permissions ( path n -- )
     over file-permissions [ bitnot ] dip bitand set-file-permissions ;
 
-M: unix copy-file-and-info ( from to -- )
-    [ copy-file ] [ swap file-permissions set-file-permissions ] 2bi ;
-
 <PRIVATE
 
 : timestamp>timeval ( timestamp -- timeval )