]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/io/directories/windows/windows.factor
io.files.info.windows: Fix file-systems word in two ways. First, don't
[factor.git] / basis / io / directories / windows / windows.factor
index 68c7a5bd079d945ab7836a1ed26193e88e8e1e40..46ce2ec44101d979f76bba8b63308049c369c7f5 100644 (file)
@@ -1,6 +1,6 @@
 ! Copyright (C) 2008 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: system io.directories io.encodings.utf16n alien.strings
+USING: system io.directories alien.strings
 io.pathnames io.backend io.files.windows destructors
 kernel accessors calendar windows windows.errors
 windows.kernel32 alien.c-types sequences splitting
@@ -64,7 +64,7 @@ M: windows delete-directory ( path -- )
 TUPLE: windows-directory-entry < directory-entry attributes ;
 
 M: windows >directory-entry ( byte-array -- directory-entry )
-    [ cFileName>> utf16n alien>string ]
+    [ cFileName>> alien>native-string ]
     [
         dwFileAttributes>>
         [ win32-file-type ] [ win32-file-attributes ] bi