From 2761c452776f2305d85be28c6cb5b52d5ff7c033 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sat, 23 Mar 2013 17:20:00 -0700
Subject: [PATCH] io.files.info: Fix unit test.

---
 basis/io/files/info/info-tests.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/io/files/info/info-tests.factor b/basis/io/files/info/info-tests.factor
index d494e87dd7..4a8bca1447 100644
--- a/basis/io/files/info/info-tests.factor
+++ b/basis/io/files/info/info-tests.factor
@@ -12,5 +12,5 @@ IN: io.files.info.tests
     temp-directory [ "test41" file-info size>> ] with-directory 4 =
 ] unit-test
 
-[ t ] [ "/" file-system-info file-system-info? ] unit-test
-[ t ] [ file-systems [ file-system-info? ] all? ] unit-test
+[ t ] [ "/" file-system-info file-system-info-tuple? ] unit-test
+[ t ] [ file-systems [ file-system-info-tuple? ] all? ] unit-test