Browse Source

rtl: correct ifdef for a code which assigns a codepage to textrec to use FPC_HAS_CPSTRING

git-svn-id: trunk@19548 -
paul 13 years ago
parent
commit
5c00cdf40d
1 changed files with 2 additions and 2 deletions
  1. 2 2
      rtl/inc/text.inc

+ 2 - 2
rtl/inc/text.inc

@@ -1951,14 +1951,14 @@ begin
     fmInput :
       begin
         TextRec(f).InOutFunc:=@FileReadFunc;
-      {$if FPC_FULLVERSION>=20700}
+      {$ifdef FPC_HAS_CPSTRING}
         TextRec(f).CodePage:=WideStringManager.GetStandardCodePageProc(scpConsoleInput);
       {$endif}
       end;
     fmOutput :
       begin
         TextRec(f).InOutFunc:=@FileWriteFunc;
-      {$if FPC_FULLVERSION>=20700}
+      {$ifdef FPC_HAS_CPSTRING}
         TextRec(f).CodePage:=WideStringManager.GetStandardCodePageProc(scpConsoleOutput);
       {$endif}
         if Do_Isdevice(hdl) then