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

2015-08-22 18:22:28 +02:00 · 2015-08-22 18:22:28 +02:00 · a2e8af2581
parent 94eb855903
commit a2e8af2581
1 changed files with 3 additions and 2 deletions
--- 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 ;

 [