From 07c5091ba9830c88621afe72db1ad78716a98d65 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Wed, 1 Aug 2012 09:11:26 +0000
Subject: [PATCH] synedit: clean up

git-svn-id: trunk@38100 -
---
 components/synedit/syneditfoldedview.pp           | 4 ----
 components/synedit/synedithighlighterfoldbase.pas | 2 --
 2 files changed, 6 deletions(-)

diff --git a/components/synedit/syneditfoldedview.pp b/components/synedit/syneditfoldedview.pp
index 8501dcb770..edfad6abab 100644
--- a/components/synedit/syneditfoldedview.pp
+++ b/components/synedit/syneditfoldedview.pp
@@ -3032,8 +3032,6 @@ var
   CurLine: TLineIdx;
   hl: TSynCustomFoldHighlighter;
   i, c, c1, l: Integer;
-  NFilter: TSynFoldActions;
-  nd: TSynFoldNodeInfo;
 begin
   if HasCount and ((AnIndex >= Count - OpeningOnLineCount) or (AnIndex >= FEvaluationIndex)) then exit;
   assert(FEvaluationIndex > 0, 'TLazSynEditNestedFoldsList.InitLineInfoForIndex already finilhed');
@@ -3102,8 +3100,6 @@ begin
 end;
 
 procedure TLazSynEditNestedFoldsList.InitCount(const AHighlighter: TSynCustomFoldHighlighter);
-var
-  i, j: Integer;
 begin
   FCount := AHighlighter.FoldBlockEndLevel(FLine - 1, FFoldGroup, FFoldFlags);
   FEvaluationIndex := FCount;
diff --git a/components/synedit/synedithighlighterfoldbase.pas b/components/synedit/synedithighlighterfoldbase.pas
index d5efce7a9d..ed01e87793 100644
--- a/components/synedit/synedithighlighterfoldbase.pas
+++ b/components/synedit/synedithighlighterfoldbase.pas
@@ -518,8 +518,6 @@ begin
 end;
 
 procedure TLazSynFoldNodeInfoList.Clear;
-var
-  c: Integer;
 begin
   ClearFilter;
   ClearData;