paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 10:58:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazutils: clean up

Browse Source
This commit is contained in:
mattias 2025-03-18 09:47:23 +01:00
parent 4cda63582d
commit a7b3a555a2
1 changed files with 1 additions and 3 deletions

4
components/lazutils/lazutf8.pas
View File

@ -227,8 +227,6 @@ var
implementation
uses
Translations;
{$IFDEF WinCE}
// CP_UTF8 is missing in the windows unit of the Windows CE RTL
@ -3555,7 +3553,7 @@ begin
else
Result := 2;
//writeln('UCS: FallBack Result = ',Result);
//Try t find start of valid UTF8 codepoints
//Try to find start of valid UTF8 codepoints
if (not Utf8TryFindCodepointStart(Org1, S1, CL1)) or
not Utf8TryFindCodepointStart(Org2, S2, CL2) then
Exit;