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

UPD: Change logic of auto checking option "Create separate archives"

Browse source
This commit is contained in:
Alexander Koblov 2011-06-29 18:26:32 +00:00
commit 14aa1fe5bb
1 changed files with 2 additions and 7 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/fpackdlg.pas
View file

@ -68,7 +68,6 @@ type
FArchiveName,
FArchiveType: UTF8String;
FArchiveTypeCount: Integer;
FFileCount: Integer;
FHasFolder,
FExistsArchive : Boolean;
FSourceFileSource: IFileSource;
@ -175,8 +174,7 @@ begin
FSourceFileSource:= SourceFileSource;
if bNewArchive then // create new archive
begin
FFileCount:= Files.Count;
if FFileCount = 1 then // if one file selected
if Files.Count = 1 then // if one file selected
begin
FHasFolder:= Files[0].IsDirectory;
FArchiveName:= Files[0].NameNoExt;
@ -459,10 +457,7 @@ begin
// If file list contain directory then
// put to the tar archive first is needed
if not FHasFolder then
begin
if FFileCount > 1 then
cbCreateSeparateArchives.Checked:= True;
end
cbCreateSeparateArchives.Checked:= True
else
begin
cbPutInTarFirst.Checked:= True;