From 2d2333d02609a145dbc33f714f2731f8abe77c1b Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Tue, 9 Jan 2018 15:32:38 +0100 Subject: tools.pas: testeObBefehlLokal bugfix --- tools.pas | 2 -- 1 file changed, 2 deletions(-) diff --git a/tools.pas b/tools.pas index 999b381..0f4b3d8 100644 --- a/tools.pas +++ b/tools.pas @@ -256,8 +256,6 @@ begin end; if notQuotedPos('=',exe)<>0 then begin args:=args+' '+trim(copy(exe,notQuotedPos('=',exe)+1,length(exe))); - delete(bef,1,length(exe)); - bef:=trim(bef); end; bef:=trim(bef); until (notQuotedPos('=',exe)=0) and (exe<>'do') and (exe<>'cat'); -- cgit v1.2.3-70-g09d2