mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-18 04:49:43 +02:00
TurboPower_iPro: Better fix to encoding issue than r64079 #75bc98773e. Issue #37992.
git-svn-id: trunk@64080 -
This commit is contained in:
parent
75bc98773e
commit
1c839c1369
@ -5799,8 +5799,8 @@ begin
|
||||
{$IFDEF IP_LAZARUS}
|
||||
Lst := TStringList.Create;
|
||||
GetSupportedEncodings(Lst);
|
||||
if Lst.IndexOf(FDocCharset)=0 then
|
||||
FDocCharset := 'UTF-8';
|
||||
if Lst.IndexOf(FDocCharset)=-1 then
|
||||
FDocCharset := '';
|
||||
Lst.Free;
|
||||
{$ENDIF}
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user