Procházet zdrojové kódy

* force utf-8 on iPhoneOS, because locale settings are absent/ignored there

git-svn-id: trunk@13066 -
Jonas Maebe před 16 roky
rodič
revize
afab9fb99c
1 změnil soubory, kde provedl 6 přidání a 0 odebrání
  1. 6 0
      rtl/unix/cwstring.pp

+ 6 - 0
rtl/unix/cwstring.pp

@@ -701,8 +701,14 @@ end;
 
 
 procedure InitThread;
 procedure InitThread;
 begin
 begin
+{$if not(defined(darwin) and defined(arm))}
   iconv_wide2ansi:=iconv_open(nl_langinfo(CODESET),unicode_encoding2);
   iconv_wide2ansi:=iconv_open(nl_langinfo(CODESET),unicode_encoding2);
   iconv_ansi2wide:=iconv_open(unicode_encoding2,nl_langinfo(CODESET));
   iconv_ansi2wide:=iconv_open(unicode_encoding2,nl_langinfo(CODESET));
+{$else}
+  { Unix locale settings are ignored on iPhoneOS }
+  iconv_wide2ansi:=iconv_open('UTF-8',unicode_encoding2);
+  iconv_ansi2wide:=iconv_open(unicode_encoding2,'UTF-8');
+{$endif}
 end;
 end;