paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 22:40:56 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fixes a bug in cyrillic conversion from martin lowercase

Browse Source 
git-svn-id: trunk@32833 -
This commit is contained in:
sekelsenmat 2011-10-12 05:55:07 +00:00
parent 36e4b9b936
commit 3208d981ee
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/lazutils/lazutf8.pas
View File

@ -1398,7 +1398,7 @@ begin
#$A0..#$AF:
begin
OutStr[-2] := chr(ord(OutStr[-2])+1);
OutStr[-1] := chr(ord(c) - $10);
OutStr[-1] := chr(ord(c) - $20);
end;
end;
end;