From a4a5e66924bcdfdea5be19aab96b9d30281662d6 Mon Sep 17 00:00:00 2001
From: sekelsenmat <sekelsenmat@lazarus-ide.org>
Date: Wed, 17 Feb 2016 07:35:16 +0000
Subject: [PATCH] fpvectorial: Fixes compilation

git-svn-id: trunk@51646 -
---
 components/fpvectorial/fpvectorial.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/fpvectorial/fpvectorial.pas b/components/fpvectorial/fpvectorial.pas
index 59d546ddf5..72f0085710 100644
--- a/components/fpvectorial/fpvectorial.pas
+++ b/components/fpvectorial/fpvectorial.pas
@@ -4072,7 +4072,7 @@ begin
   lBrush := LCLIntf.CreateBrushWithRadialGradient(lLogRadGrad);
   lOldBrush := TCanvas(ADest).Brush.Handle;
   TCanvas(ADest).Brush.Handle := lBrush;
-  TCanvas(ADest).Polygon(polypoints);
+  TCanvas(ADest).Polygon(APoints);
   TCanvas(ADest).Brush.Handle := lOldBrush;
   {$endif}
 end;