2
0
Reinier Olislagers 11 жил өмнө
parent
commit
bff407607f

+ 0 - 1
backuprestore.pas

@@ -249,7 +249,6 @@ begin
         FBKZippedFile:= ExtractFileName(UserFile);
         FBKZippedFile:= ExtractFileName(UserFile);
         if LowerCase(ExtractFileExt(FBKZippedFile))='.zip' then
         if LowerCase(ExtractFileExt(FBKZippedFile))='.zip' then
           FBKZippedFile:= ChangeFileExt(FBKZippedFile,''); //get rid of ending .zip
           FBKZippedFile:= ChangeFileExt(FBKZippedFile,''); //get rid of ending .zip
-          //Delete(FBKZippedFile,1+length(FBKZippedFile)-length('.zip'),length(FBKZippedFile));
         if LowerCase(ExtractFileExt(FBKZippedFile))<>'.fbk' then
         if LowerCase(ExtractFileExt(FBKZippedFile))<>'.fbk' then
           FBKZippedFile:= FBKZippedFile+'.fbk'; //add extension if not specified
           FBKZippedFile:= FBKZippedFile+'.fbk'; //add extension if not specified
         Zipper.Entries.AddFileEntry(TempFile, FBKZippedFile);
         Zipper.Entries.AddFileEntry(TempFile, FBKZippedFile);