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

git-svn-id: trunk@15176 -

packages/paszlib/src/zipper.pp

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