@@ -327,7 +327,7 @@ begin
{$endif FPC}
end;
-{$endif in_dos}
+{$else in_dos}
{*****************************************************************************
@@ -362,6 +362,7 @@ procedure InitRedir;
begin
+{$endif in_dos}
Initialize