paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-17 17:19:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: unit dependencies: fixed crash on refresh: bug #13501, from Alexander S. Klenin

Browse Source 
git-svn-id: trunk@19559 -
This commit is contained in:
mattias 2009-04-21 15:56:55 +00:00
parent 4f1c322f14
commit 2d75d65468
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/unitdependencies.pas
View File

@ -284,7 +284,7 @@ var
begin
if Stage<>cdPostPaint then exit;
UnitNode:=TUnitNode(Node.Data);
if UnitNode.IsFirstImplementationNode then begin
if (UnitNode<>nil) and UnitNode.IsFirstImplementationNode then begin
NodeRect:=Node.DisplayRect(false);
NodeRect.Left:=Node.DisplayStateIconLeft;
with Node.TreeView.Canvas do begin