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

FIX: Show compare files window when one file has zero size

Browse source
This commit is contained in:
Alexander Koblov 2020-02-07 21:37:03 +00:00
commit bd4ffbc9fc
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/fdiffer.pas
View file

@ -286,6 +286,7 @@ begin
OpenFileRight(FileNameRight);
if actAutoCompare.Checked then actStartCompare.Execute;
end;
FShowIdentical:= FShowIdentical and actStartCompare.Enabled;
if actBinaryCompare.Checked or (FShowIdentical = False) then
begin
if Modal then
@ -762,7 +763,7 @@ var
begin
Message:= rsDiffFilesIdentical + LineEnding + LineEnding;
Message+= edtFileNameLeft.Text + LineEnding + edtFileNameRight.Text;
if MessageDlg(rsToolDiffer, Message, mtWarning, [mbClose, mbCancel], 0, mbClose) = mrClose then
if MessageDlg(rsToolDiffer, Message, mtWarning, [mbIgnore, mbCancel], 0, mbIgnore) = mrCancel then
Close
else begin
FShowIdentical:= False;