diff options
| -rw-r--r-- | tools.pas | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -273,7 +273,7 @@ end; procedure testeObBefehlLokal(bef, ordner: string; dateiListe: tMyStringList; lokTest: tRegExpr); var - exe,args,regex,oBef,s: string; + exe,args,regEx,oBef,s: string; dateien,sl,relZeil,env: tMyStringList; i,matchNum: longint; re: tRegExpr; @@ -312,14 +312,14 @@ begin if exe='gnuplot' then begin // set output "~/Dokumente/Erich_Masterarbeit/Bilder/gnuplot/Energiescan.tex" - regex:='^ *set +output +'; + regEx:='^ *set +output +'; re:=tRegExpr.create; re.expression:='"([^"]*/[^"]*)"'; matchNum:=1; end else if exe='epost' then begin // Datei: - regex:='^ *(Datei|Legende):'; + regEx:='^ *(Datei|Legende):'; re:=tRegExpr.create; re.expression:='[^ :]*/[^ ]*'; matchNum:=0; @@ -327,7 +327,7 @@ begin else if exe='math' then begin // das wird vmtl. schwer zu überprüfen, außer man nimmt Muster, // die generisch auf Pfade passen, aber dann erwischt man auch den Input mit ... - regex:='^([^"]*"[^"]*")*[^"]*"([^"]*/)+[^"]*"'; + regEx:='^([^"]*"[^"]*")*[^"]*"([^"]*/)+[^"]*"'; re:=tRegExpr.create; re.expression:='"([^"]*/[^"]*)"'; matchNum:=1; @@ -353,7 +353,7 @@ begin exit; end else begin - regex:=''; + regEx:=''; re:=tRegExpr.create; re.expression:='\S+'; matchNum:=0; @@ -364,7 +364,7 @@ begin gibAus('Warnung: Hier ist ein Befehl ohne offensichtliche Input-Dateien! ('''+oBef+''')!',3); relZeil:=tMyStringList.create; - if regex='' then begin + if regEx='' then begin // dateien sind bereits die zu betrachtenden Dateien for i:=0 to dateien.count-1 do begin if re.exec(dateien[i]) then @@ -379,10 +379,10 @@ begin sl.loadFromFile(dateien[i]); sl.shellSubst(env); if exe='epost' then begin - sl.grep(regex+'|^[!?]'); + sl.grep(regEx+'|^[!?]'); sl.unfoldMacros; end; - sl.grep(regex); + sl.grep(regEx); relZeil.addStrings(sl); end; sl.free; |