fix(windows): crash with package online update

Fixes #4005.

The wrong object was being freed which caused an access violation
internally.
This commit is contained in:
Marc Durdin 2020-12-01 10:15:05 +11:00
parent a2d6f7d3e8
commit bbfe5adcc8

View file

@ -283,7 +283,7 @@ begin
kpil.RegisterTip(KeyboardID, BCP47Tag, KeyboardName, Langs[0], IconFileName, '');
kpil.InstallTip(KeyboardID, BCP47Tag, Langs[0], guid);
finally
Free;
kpil.Free;
end;
end;
@ -304,7 +304,7 @@ begin
Result := True;
end;
finally
Free;
kpil.Free;
end;
end;