From b9e043effee243acad4b9a3949b858a1b4e12cbe Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Tue, 21 Oct 2008 23:43:36 -0500
Subject: [PATCH] move >file-system-info

---
 basis/unix/statfs/statfs.factor | 2 ++
 core/io/files/files.factor      | 3 ---
 2 files changed, 2 insertions(+), 3 deletions(-)

diff --git a/basis/unix/statfs/statfs.factor b/basis/unix/statfs/statfs.factor
index 8ac5a46883..f00ffe77cd 100644
--- a/basis/unix/statfs/statfs.factor
+++ b/basis/unix/statfs/statfs.factor
@@ -14,6 +14,8 @@ HOOK: mounted-struct>mounted os ( byte-array -- mounted )
 
 TUPLE: file-system-info root-directory total-free-size total-size ;
 
+HOOK: >file-system-info os ( struct -- statfs )
+
 : mounted ( -- array )
     mounted* [ mounted-struct>mounted ] map ;
 
diff --git a/core/io/files/files.factor b/core/io/files/files.factor
index cfb90d58a5..1f6a48b50e 100644
--- a/core/io/files/files.factor
+++ b/core/io/files/files.factor
@@ -188,9 +188,6 @@ TUPLE: file-system-info mount-on free-space ;
 
 HOOK: file-system-info os ( path -- file-system-info )
 
-HOOK: >file-system-info os ( struct -- statfs )
-
-
 <PRIVATE
 
 HOOK: cd io-backend ( path -- )