From fa47b6299ac8bb7c6f44ae4eb14e689352fed0da Mon Sep 17 00:00:00 2001
From: jesus <jesus@lazarus-ide.org>
Date: Wed, 22 Sep 2010 21:26:09 +0000
Subject: [PATCH] LazReport, clean-up

git-svn-id: trunk@27442 -
---
 components/lazreport/samples/editor/maincalleditor.pas | 1 -
 1 file changed, 1 deletion(-)

diff --git a/components/lazreport/samples/editor/maincalleditor.pas b/components/lazreport/samples/editor/maincalleditor.pas
index ede1748525..d3523c4f98 100644
--- a/components/lazreport/samples/editor/maincalleditor.pas
+++ b/components/lazreport/samples/editor/maincalleditor.pas
@@ -491,7 +491,6 @@ procedure TfrmMain.TheReportUserFunction(const AName: String; p1, p2,
   p3: Variant; var Val: Variant);
 var
   v: variant;
-  b: boolean;
 begin
   if AName='STOCKFLAG' then begin
     v := frParser.Calc(P1);