From 15139b06ec4c15db960ae6047a0fbbf1152c4343 Mon Sep 17 00:00:00 2001
From: erg <erg@JamesDesktop.(none)>
Date: Thu, 27 Mar 2008 09:06:06 -0500
Subject: [PATCH] can't use unicode or ascii in io.files..
---
core/io/files/files.factor | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/core/io/files/files.factor b/core/io/files/files.factor
index 94401f3e1f..f6888bf78d 100755
--- a/core/io/files/files.factor
+++ b/core/io/files/files.factor
@@ -3,7 +3,7 @@
USING: io.backend io.files.private io hashtables kernel math
memory namespaces sequences strings assocs arrays definitions
system combinators splitting sbufs continuations io.encodings
-io.encodings.binary init unicode.categories ;
+io.encodings.binary init ;
IN: io.files
HOOK: (file-reader) io-backend ( path -- stream )
@@ -101,7 +101,7 @@ PRIVATE>
: windows-absolute-path? ( path -- path ? )
{
{ [ dup length 2 < ] [ f ] }
- { [ dup first2 >r Letter? r> CHAR: : = and ] [ t ] }
+ { [ dup second CHAR: : = ] [ t ] }
{ [ t ] [ f ] }
} cond ;