From 0283266d1a8a1a240e720e44a18301675b1d5903 Mon Sep 17 00:00:00 2001
From: Erich Eckner <git@eckner.net>
Date: Wed, 23 May 2018 11:59:28 +0200
Subject: dateibeziehungen.pas: remove obsolete "begin ... end"

---
 Make.lps             | 103 +++++++++++++++++++++++++--------------------------
 dateibeziehungen.pas |   3 +-
 2 files changed, 52 insertions(+), 54 deletions(-)

diff --git a/Make.lps b/Make.lps
index 55cb9cc..5ead79b 100644
--- a/Make.lps
+++ b/Make.lps
@@ -9,13 +9,13 @@
         <IsPartOfProject Value="True"/>
         <TopLine Value="51"/>
         <CursorPos Y="3"/>
-        <UsageCount Value="128"/>
+        <UsageCount Value="129"/>
         <Loaded Value="True"/>
       </Unit0>
       <Unit1>
         <Filename Value="Machdatei.txt"/>
         <IsPartOfProject Value="True"/>
-        <UsageCount Value="128"/>
+        <UsageCount Value="129"/>
         <DefaultSyntaxHighlighter Value="None"/>
       </Unit1>
       <Unit2>
@@ -24,7 +24,7 @@
         <EditorIndex Value="5"/>
         <TopLine Value="59"/>
         <CursorPos Y="68"/>
-        <UsageCount Value="107"/>
+        <UsageCount Value="108"/>
         <Loaded Value="True"/>
       </Unit2>
       <Unit3>
@@ -33,7 +33,7 @@
         <EditorIndex Value="3"/>
         <TopLine Value="377"/>
         <CursorPos X="36" Y="377"/>
-        <UsageCount Value="104"/>
+        <UsageCount Value="105"/>
         <Loaded Value="True"/>
       </Unit3>
       <Unit4>
@@ -42,10 +42,9 @@
         <UnitName Value="dateiBeziehungen"/>
         <IsVisibleTab Value="True"/>
         <EditorIndex Value="1"/>
-        <TopLine Value="223"/>
-        <CursorPos X="30" Y="496"/>
-        <FoldState Value=" T3kL03C pkIl80B41222/"/>
-        <UsageCount Value="96"/>
+        <TopLine Value="281"/>
+        <CursorPos X="82" Y="292"/>
+        <UsageCount Value="97"/>
         <Loaded Value="True"/>
       </Unit4>
       <Unit5>
@@ -149,119 +148,119 @@
     <JumpHistory Count="30" HistoryIndex="29">
       <Position1>
         <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="1251" Column="11" TopLine="1237"/>
+        <Caret Line="239" TopLine="206"/>
       </Position1>
       <Position2>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="1255" Column="58" TopLine="1237"/>
+        <Filename Value="tools.pas"/>
+        <Caret Line="681" Column="49" TopLine="673"/>
       </Position2>
       <Position3>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="1258" Column="20" TopLine="1238"/>
+        <Filename Value="tools.pas"/>
+        <Caret Line="727" Column="78" TopLine="710"/>
       </Position3>
       <Position4>
         <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="269" Column="81" TopLine="269"/>
+        <Caret Line="674" Column="68" TopLine="665"/>
       </Position4>
       <Position5>
         <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="1242" Column="158" TopLine="1217"/>
       </Position5>
       <Position6>
-        <Filename Value="tools.pas"/>
-        <Caret Line="240" TopLine="219"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="108" Column="28" TopLine="90"/>
       </Position6>
       <Position7>
         <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="239" TopLine="206"/>
+        <Caret Line="1042" TopLine="1017"/>
       </Position7>
       <Position8>
-        <Filename Value="tools.pas"/>
-        <Caret Line="681" Column="49" TopLine="673"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="77" Column="26" TopLine="60"/>
       </Position8>
       <Position9>
         <Filename Value="tools.pas"/>
-        <Caret Line="727" Column="78" TopLine="710"/>
+        <Caret Line="86" Column="55" TopLine="67"/>
       </Position9>
       <Position10>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="674" Column="68" TopLine="665"/>
+        <Filename Value="../units/lowlevelunit.pas"/>
+        <Caret Line="148" Column="120" TopLine="124"/>
       </Position10>
       <Position11>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="1242" Column="158" TopLine="1217"/>
+        <Filename Value="tools.pas"/>
+        <Caret Line="579" Column="90" TopLine="564"/>
       </Position11>
       <Position12>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="108" Column="28" TopLine="90"/>
+        <Filename Value="../units/lowlevelunit.pas"/>
+        <Caret Line="1330" Column="31" TopLine="1316"/>
       </Position12>
       <Position13>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="1042" TopLine="1017"/>
+        <Filename Value="../units/lowlevelunit.pas"/>
+        <Caret Line="164" TopLine="145"/>
       </Position13>
       <Position14>
-        <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="77" Column="26" TopLine="60"/>
+        <Filename Value="../units/lowlevelunit.pas"/>
+        <Caret Line="162" Column="18" TopLine="144"/>
       </Position14>
       <Position15>
-        <Filename Value="tools.pas"/>
-        <Caret Line="86" Column="55" TopLine="67"/>
+        <Filename Value="../units/lowlevelunit.pas"/>
       </Position15>
       <Position16>
         <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="148" Column="120" TopLine="124"/>
+        <Caret Line="162" Column="18" TopLine="133"/>
       </Position16>
       <Position17>
-        <Filename Value="tools.pas"/>
-        <Caret Line="579" Column="90" TopLine="564"/>
+        <Filename Value="../units/lowlevelunit.pas"/>
+        <Caret Line="1315" Column="102" TopLine="1303"/>
       </Position17>
       <Position18>
         <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="1330" Column="31" TopLine="1316"/>
       </Position18>
       <Position19>
         <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="164" TopLine="145"/>
+        <Caret Line="163" Column="65" TopLine="133"/>
       </Position19>
       <Position20>
         <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="162" Column="18" TopLine="144"/>
+        <Caret Line="120" Column="18" TopLine="108"/>
       </Position20>
       <Position21>
         <Filename Value="../units/lowlevelunit.pas"/>
+        <Caret Line="1331" Column="10" TopLine="1320"/>
       </Position21>
       <Position22>
-        <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="162" Column="18" TopLine="133"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="563" Column="92" TopLine="365"/>
       </Position22>
       <Position23>
-        <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="1315" Column="102" TopLine="1303"/>
+        <Filename Value="dateibeziehungen.pas"/>
       </Position23>
       <Position24>
-        <Filename Value="../units/lowlevelunit.pas"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="823" TopLine="727"/>
       </Position24>
       <Position25>
-        <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="163" Column="65" TopLine="133"/>
+        <Filename Value="dateibeziehungen.pas"/>
       </Position25>
       <Position26>
-        <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="120" Column="18" TopLine="108"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="271" Column="48" TopLine="266"/>
       </Position26>
       <Position27>
-        <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="869" Column="18" TopLine="870"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="129" Column="24" TopLine="111"/>
       </Position27>
       <Position28>
-        <Filename Value="../units/lowlevelunit.pas"/>
-        <Caret Line="1331" Column="10" TopLine="1320"/>
+        <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="248" Column="56" TopLine="170"/>
       </Position28>
       <Position29>
         <Filename Value="dateibeziehungen.pas"/>
-        <Caret Line="563" Column="92" TopLine="365"/>
+        <Caret Line="271" Column="52" TopLine="243"/>
       </Position29>
       <Position30>
         <Filename Value="dateibeziehungen.pas"/>
+        <Caret Line="1259" Column="70" TopLine="1245"/>
       </Position30>
     </JumpHistory>
   </ProjectSession>
diff --git a/dateibeziehungen.pas b/dateibeziehungen.pas
index 7bd4560..0654726 100644
--- a/dateibeziehungen.pas
+++ b/dateibeziehungen.pas
@@ -256,7 +256,7 @@ begin
   for i:=0 to length(toepfe)-1 do
     setLength(toepfe[i],0);
 
-  for i:=0 to count-1 do begin
+  for i:=0 to count-1 do
     for j:=0 to items[i].ziele.count-1 do begin
       k:=pruefSumme(items[i].ziele[j].name,length(toepfe));
       setLength(toepfe[k],length(toepfe[k])+1);
@@ -265,7 +265,6 @@ begin
       // hiermit finden wir schnell(er) zu einer Datei(summe) die Regel, die diese Datei erzeugt:
       // toepfe[summe] ist ein Array aller Regeln (Indizes), die Ziele dieser Summe erzeugen
     end;
-  end;
 
   setLength(bedingungFindeThreads,numCpus);
   for i:=0 to length(bedingungFindeThreads)-1 do
-- 
cgit v1.2.3