mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-28 10:02:14 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: the issue of Tar being deleted when processed by Wcx in uWcxArchiveCopyInOperation

Browse source
This commit is contained in:
rich2014 2026-06-24 13:41:58 +08:00
commit e7d1ebc02a
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/filesources/wcxarchive/uwcxarchivecopyinoperation.pas
View file

@ -340,7 +340,7 @@ begin
if (PackingFlags and PK_PACK_MOVE_FILES) <> 0 then
removeFiles:= SourceFiles.Clone;
// Result = True menas processing by Wcx already
// Result = True means that Tar is processed by WCX
if self.Tar() then
Exit;
@ -359,7 +359,7 @@ begin
FreeAndNil(FFullFilesTree);
removeFiles.Free;
// Delete temporary TAR archive if needed
if FTarBefore then
if FTarFileName <> EmptyStr then
mbDeleteFile(FTarFileName);
end;
end;
@ -658,8 +658,7 @@ begin
begin
if Assigned(PackToMem) and (PluginCapabilities and PK_CAPS_MEMPACK <> 0) then
begin
FTarFileName:= ArchiveFileName;
FTarWriter:= TTarWriter.Create(FTarFileName,
FTarWriter:= TTarWriter.Create(ArchiveFileName,
@AskQuestion,
@RaiseAbortOperation,
@CheckOperationState,
@ -684,6 +683,7 @@ begin
try
if TarFiles() then begin
if Result = False then begin
// Result = False means that Tar is processed internally
// Fill file list with tar archive file
SourceFiles.Clear;
SourceFiles.Path:= ExtractFilePath(FTarFileName);