Pārlūkot izejas kodu

* declare the code page names as ansistring instead of rawbytestring and
force the checked names to CP_ACP, so perform string conversions on
the names after the compiler bug has been fixed that sets the code
page of rawbytestring typed constants to CP_NONE

git-svn-id: trunk@26396 -

Jonas Maebe 11 gadi atpakaļ
vecāks
revīzija
729ac297e4
1 mainītis faili ar 2 papildinājumiem un 2 dzēšanām
  1. 2 2
      rtl/unix/unixcp.pp

+ 2 - 2
rtl/unix/unixcp.pp

@@ -26,7 +26,7 @@ uses baseunix;
 type
 type
   TUnixCpData = record
   TUnixCpData = record
    cp: word;
    cp: word;
-   name: rawbytestring; { for null-termination }
+   name: ansistring; { for null-termination }
   end;
   end;
 (*
 (*
 * Code Page Identifiers
 * Code Page Identifiers
@@ -679,7 +679,7 @@ var
 begin
 begin
   { clear encoding to prevent nonsense code page conversion of the input
   { clear encoding to prevent nonsense code page conversion of the input
     ansistring (encoding names are always ascii) }
     ansistring (encoding names are always ascii) }
-  SetCodePage(cpname,$ffff,false);
+  SetCodePage(cpname,CP_ACP,false);
 
 
   { Linux uses cpXXXX instead of CPXXXX }
   { Linux uses cpXXXX instead of CPXXXX }
   if (length(cpname)>2) and
   if (length(cpname)>2) and