From ddfb032913eef39e744a5d38f8db3849314b80cf Mon Sep 17 00:00:00 2001
From: sergei <gorelkin@nanoreflex.ru>
Date: Wed, 8 Dec 2010 23:42:39 +0000
Subject: [PATCH] * VarUtils, fixed a wrong identifier

git-svn-id: trunk@16524 -
---
 rtl/objpas/cvarutil.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/objpas/cvarutil.inc b/rtl/objpas/cvarutil.inc
index e805cf310a..485a3515ae 100644
--- a/rtl/objpas/cvarutil.inc
+++ b/rtl/objpas/cvarutil.inc
@@ -769,7 +769,7 @@ begin
           Result := vDouble;
         end;
         varDate     : begin
-          if (varDate > MaxCurrency) or (varDate < MinCurrency) then
+          if (vDate > MaxCurrency) or (vDate < MinCurrency) then
             VariantTypeMismatch(vType, varCurrency);
           Result := vDate;
         end;