io.files.info.windows: Fix file-systems word in two ways. First, don't

[factor.git] / basis / tools / deploy / libraries / windows / windows.factor

diff --git a/basis/tools/deploy/libraries/windows/windows.factor b/basis/tools/deploy/libraries/windows/windows.factor
index 82fd5179fa154bd30c666a65c1e0e5921bea710c..4d56b48418581408bd36440598c6f28090781594 100644 (file)
--- a/basis/tools/deploy/libraries/windows/windows.factor
+++ b/basis/tools/deploy/libraries/windows/windows.factor
@@ -1,5 +1,5 @@
 ! (c)2010 Joe Groff bsd license
-USING: alien.data alien.strings byte-arrays io.encodings.utf16n
+USING: alien.data alien.strings byte-arrays
 kernel specialized-arrays system tools.deploy.libraries
 windows.kernel32 windows.types ;
 FROM: alien.c-types => ushort ;
@@ -10,7 +10,7 @@ M: windows find-library-file
     f DONT_RESOLVE_DLL_REFERENCES LoadLibraryEx [
         [
             32768 ushort (c-array) [ 32768 GetModuleFileName drop ] keep
-            utf16n alien>string
+            alien>native-string
         ] [ FreeLibrary drop ] bi
     ] [ f ] if* ;