diff options
Diffstat (limited to 'packages/fcl-xml')
| -rw-r--r-- | packages/fcl-xml/src/dom.pp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/fcl-xml/src/dom.pp b/packages/fcl-xml/src/dom.pp index 30370455e7..2524784fee 100644 --- a/packages/fcl-xml/src/dom.pp +++ b/packages/fcl-xml/src/dom.pp @@ -2484,7 +2484,7 @@ end; } procedure TDOMDocument.NodeListDestroyed(aList: TDOMNodeList); begin - if not (nfDestroying in FFlags) then + if (not (nfDestroying in FFlags)) and (FNodeLists <> nil) then FNodeLists.RemoveData(aList); end; |