FIX: MultiArc - crash on discard click (#1934)

This commit is contained in:
j2969719 2024-10-22 08:37:37 +03:00 committed by GitHub
commit d616b527db
No known key found for this signature in database
GPG key ID: B5690EEEBB952194
2 changed files with 2 additions and 0 deletions

View file

@ -1374,6 +1374,7 @@ inherited frmOptionsArchivers: TfrmOptionsArchivers
end
object miArchiverDiscardModification: TMenuItem
Caption = 'Discard modifications'
Enabled = False
OnClick = miArchiverDiscardModificationClick
end
object miSeparator1: TMenuItem

View file

@ -680,6 +680,7 @@ begin
if MultiArcListTemp <> nil then
MultiArcListTemp.Free;
MultiArcListTemp := gMultiArcList.Clone;
FillListBoxWithArchiverList;
lbxArchiverSelectionChange(lbxArchiver, False);
end;