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

IDE: project inspector: fixed opening files, bug #19543

Browse Source 
git-svn-id: trunk@31181 -
This commit is contained in:
mattias 2011-06-12 06:58:42 +00:00
parent bce929a582
commit c8562d58ed
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/projectinspector.pas
View File

@ -926,7 +926,7 @@ begin
Result:=nil;
if LazProject=nil then exit;
CurNode:=ItemsTreeView.Selected;
if (CurNode=nil) or (CurNode.Parent<>FFilesNode) then exit;
if (CurNode=nil) then exit;
//debugln(['TProjectInspectorForm.GetCurrentFile ',DbgSName(TObject(CurNode.Data)),' ',CurNode.Text]);
if TObject(CurNode.Data) is TProjInspFileItem then
begin