Fixed: list index out of bounds
This commit is contained in:
parent
c82652a873
commit
c5ae6a8cef
@ -197,7 +197,11 @@ begin
|
|||||||
begin
|
begin
|
||||||
lastItem := Pred(SectionStack.Count);
|
lastItem := Pred(SectionStack.Count);
|
||||||
|
|
||||||
FSection := (SectionStack[Pred(lastItem)] as IXMLSection);
|
if lastItem < 0 then
|
||||||
|
FSection := Configuration
|
||||||
|
else
|
||||||
|
FSection := (SectionStack[Pred(lastItem)] as IXMLSection);
|
||||||
|
|
||||||
SectionStack.Delete(lastItem);
|
SectionStack.Delete(lastItem);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user