paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-16 01:39:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed last commit: UTF8Encode -> UTF8Decode

Browse Source 
git-svn-id: trunk@13452 -
This commit is contained in:
florian 2009-07-26 13:09:31 +00:00
parent d38340c753
commit e362e85039
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/variant.inc
View File

@ -240,7 +240,7 @@ end;
operator :=(const source : UTF8String) dest : variant;{$ifdef SYSTEMINLINE}inline;{$endif}
begin
VariantManager.VarFromWStr(Dest,UTF8Encode(Source));
VariantManager.VarFromWStr(Dest,UTF8Decode(Source));
end;