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: Overwrite read only files

Browse source
This commit is contained in:
Alexander Koblov 2013-12-15 15:57:13 +00:00
commit ebf96d06c5
1 changed files with 8 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/filesources/filesystem/ufilesystemutil.pas
View file

@ -1344,8 +1344,14 @@ var
Exit(fsoterSkip);
fsoofeOverwrite:
begin
mbDeleteFile(AbsoluteTargetFileName);
Exit(fsoterDeleted);
if FileIsReadOnly(Attrs) then
mbFileSetReadOnly(AbsoluteTargetFileName, False);
if FPS_ISLNK(Attrs) or (FMode = fsohmMove) then
begin
mbDeleteFile(AbsoluteTargetFileName);
Exit(fsoterDeleted);
end;
Exit(fsoterNotExists);
end;
fsoofeAppend:
begin