io.files: command line params is in the system's native encoding

diff --git a/core/io/files/files.factor b/core/io/files/files.factor
index da758adeef9739036a63680096e3b3890155ffdc..f2a212a40371a1bc94816e9cc3a16c0662d78728 100644 (file)
--- a/core/io/files/files.factor
+++ b/core/io/files/files.factor
@@ -85,8 +85,9 @@ M: object cwd ( -- path ) "." ;
 PRIVATE>
 
 : init-resource-path ( -- )
-    OBJ-ARGS special-object
-    [ utf8 alien>string "-resource-path=" ?head [ drop f ] unless ] map-find drop
+    OBJ-ARGS special-object [
+        alien>native-string "-resource-path=" ?head [ drop f ] unless
+    ] map-find drop
     [ image-path parent-directory ] unless* "resource-path" set-global ;
 
 [