From e362e850399b916a788933b5149e51e8e974a9da Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 26 Jul 2009 13:09:31 +0000
Subject: [PATCH] * fixed last commit: UTF8Encode -> UTF8Decode
git-svn-id: trunk@13452 -
---
rtl/inc/variant.inc | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/rtl/inc/variant.inc b/rtl/inc/variant.inc
index 2a72a4136c..87e3c30b38 100644
--- a/rtl/inc/variant.inc
+++ b/rtl/inc/variant.inc
@@ -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;