From 1f087c26e5236eb8fdd0685e9ae75bc02d8d3c24 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Fri, 24 Nov 2017 15:29:14 +0100 Subject: bugfix Lokalitätstest MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dateibeziehungen.pas | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'dateibeziehungen.pas') diff --git a/dateibeziehungen.pas b/dateibeziehungen.pas index a27b0e4..22ce0b5 100644 --- a/dateibeziehungen.pas +++ b/dateibeziehungen.pas @@ -1029,10 +1029,11 @@ begin befehle.add(_mglAbh[i].befehle[j]); if not unsicher then begin lokTest:=tRegExpr.create; - if extractfilepath(ausgabeDatei)=extractfilepath(pruefsummenDatei) then - lokTest.expression:='^'+extractfilepath(ausgabeDatei)+'/' + if (ausgabeDatei='') or + (extractfilepath(ausgabeDatei)=extractfilepath(pruefsummenDatei)) then + lokTest.expression:='^'+extractfilepath(pruefsummenDatei) else - lokTest.expression:='^('+extractfilepath(ausgabeDatei)+'|'+extractfilepath(pruefsummenDatei)+')/'; + lokTest.expression:='^('+extractfilepath(ausgabeDatei)+'|'+extractfilepath(pruefsummenDatei)+')'; for i:=0 to befehle.count-1 do testeObBefehlLokal(befehle[i],extractfiledir(ausgabeDatei),geaenderteDateien,lokTest); lokTest.free; -- cgit v1.2.3-54-g00ecf