{
Sometime mods are released for another language, or author accidently
edited some records and they got saved with a different language.
This script will copy FULL and DESC subrecords from master to restore original names.
}
unit UserScript;
function Process(e: IInterface): integer;
var
m: IInterface;
begin
if not ElementExists(e, 'FULL') and not ElementExists(e, 'DESC') then
Exit;
// get master record
m := Master(e);
// no master - nothing to restore
if not Assigned(m) then
Exit;
// if record overrides several masters, then get the last one
if OverrideCount(m) > 1 then
m := OverrideByIndex(m, OverrideCount(m) - 2);
if not SameText(GetElementEditValues(e, 'FULL'), GetElementEditValues(m, 'FULL')) then
SetElementEditValues(e, 'FULL', GetElementEditValues(m, 'FULL'));
if not SameText(GetElementEditValues(e, 'DESC'), GetElementEditValues(m, 'DESC')) then
SetElementEditValues(e, 'DESC', GetElementEditValues(m, 'DESC'));
end;
end.