dateibeziehungen.pas: bugfix: Rückgabewert von zieleHinzufuegen gibt nicht Erfolg bekannt und ist dementsprechend kein Grund abzubrechen!

2 files changed, 4 insertions, 7 deletions

diff --git a/Make.lps b/Make.lps
index cc450a9..fd7d175 100644
--- a/Make.lps
+++ b/Make.lps
@@ -42,9 +42,9 @@
         <UnitName Value="dateiBeziehungen"/>
         <IsVisibleTab Value="True"/>
         <EditorIndex Value="1"/>
-        <TopLine Value="419"/>
-        <CursorPos Y="450"/>
-        <FoldState Value=" T3k103C2322 pigrM0P8 pj1k5070131]Mk7pG033%"/>
+        <TopLine Value="315"/>
+        <CursorPos X="23" Y="425"/>
+        <FoldState Value=" T3k103C2322_"/>
         <UsageCount Value="55"/>
         <Loaded Value="True"/>
       </Unit4>
diff --git a/dateibeziehungen.pas b/dateibeziehungen.pas
index 98f0735..f41e6a6 100644
--- a/dateibeziehungen.pas
+++ b/dateibeziehungen.pas
@@ -445,10 +445,7 @@ begin
     else begin
       i:=findFirst(zielFkt,$3f,sR);
       while i=0 do begin
-        if not zieleHinzufuegen(ziele,quellen,extractFileDir(zielFkt)+'/'+sR.name) then begin
-          findClose(sR);
-          exit;
-        end;
+        zieleHinzufuegen(ziele,quellen,extractFileDir(zielFkt)+'/'+sR.name);
         i:=findNext(sR);
       end;
       findClose(sR);