* TZipper.ZipFiles should zip files, got broken in r13464

git-svn-id: trunk@15176 -
This commit is contained in:
joost 2010-04-25 18:15:09 +00:00
parent 94eae61a31
commit 3c42ad5e5e

View File

@ -1459,6 +1459,7 @@ Procedure TZipper.ZipFiles(AFileName : String; FileList : TStrings);
begin
FFileName:=AFileName;
ZipFiles(FileList);
end;
procedure TZipper.ZipFiles(FileList: TStrings);