mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

Revert "UPD: Disable modification of temporary archives"

Browse source 
This reverts commit 740d699f61.
This commit is contained in:
Alexander Koblov 2024-11-29 23:51:01 +03:00
commit 014ac5a0a6
1 changed files with 7 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

23
src/filesources/wcxarchive/uwcxarchivefilesource.pas
View file

@ -151,7 +151,6 @@ uses
DCFileAttributes,
FileUtil, uCryptProc,
uWcxArchiveListOperation,
uTempFileSystemFileSource,
uWcxArchiveCopyInOperation,
uWcxArchiveCopyOutOperation,
uWcxArchiveDeleteOperation,
@ -590,14 +589,10 @@ function TWcxArchiveFileSource.CreateCopyInOperation(
var
TargetFileSource: IFileSource;
begin
if ParentFileSource is ITempFileSystemFileSource then
Result := nil
else begin
TargetFileSource := Self;
Result := TWcxArchiveCopyInOperation.Create(SourceFileSource,
TargetFileSource,
SourceFiles, TargetPath);
end;
TargetFileSource := Self;
Result := TWcxArchiveCopyInOperation.Create(SourceFileSource,
TargetFileSource,
SourceFiles, TargetPath);
end;
function TWcxArchiveFileSource.CreateCopyOutOperation(
@ -617,13 +612,9 @@ function TWcxArchiveFileSource.CreateDeleteOperation(var FilesToDelete: TFiles):
var
TargetFileSource: IFileSource;
begin
if ParentFileSource is ITempFileSystemFileSource then
Result := nil
else begin
TargetFileSource := Self;
Result := TWcxArchiveDeleteOperation.Create(TargetFileSource,
FilesToDelete);
end;
TargetFileSource := Self;
Result := TWcxArchiveDeleteOperation.Create(TargetFileSource,
FilesToDelete);
end;
function TWcxArchiveFileSource.CreateExecuteOperation(var ExecutableFile: TFile;