paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-01 23:20:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

TurboPower_iPro: Better fix to encoding issue than r64079 #75bc98773e. Issue #37992.

Browse Source 
git-svn-id: trunk@64080 -
This commit is contained in:
wp 2020-10-28 11:52:52 +00:00
parent 75bc98773e
commit 1c839c1369
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/turbopower_ipro/iphtml.pas
View File

@ -5799,8 +5799,8 @@ begin
{$IFDEF IP_LAZARUS} {$IFDEF IP_LAZARUS}
Lst := TStringList.Create; Lst := TStringList.Create;
GetSupportedEncodings(Lst); GetSupportedEncodings(Lst);
if Lst.IndexOf(FDocCharset)=0 then if Lst.IndexOf(FDocCharset)=-1 then
FDocCharset := 'UTF-8'; FDocCharset := '';
Lst.Free; Lst.Free;
{$ENDIF} {$ENDIF}
end; end;