mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-05 12:13:30 +01:00
IDE: 2.4.0 compatibility
git-svn-id: trunk@28702 -
This commit is contained in:
parent
f9e4baf8f3
commit
69ef97f530
@ -186,7 +186,7 @@ begin
|
||||
FormFilename:=LazarusIDE.FindUnitFile(GetClassUnitName(UnitControl.ClassType),LazarusIDE);
|
||||
//debugln(['FindDeclarationOfIDEControl FormFilename=',FormFilename]);
|
||||
if FormFilename='' then begin
|
||||
debugln(['FindDeclarationOfIDEControl UnitControl=',DbgSName(UnitControl),' Unitname=',UnitControl.UnitName,': unit source not found']);
|
||||
debugln(['FindDeclarationOfIDEControl UnitControl=',DbgSName(UnitControl),' Unitname=',GetClassUnitName(UnitControl.ClassType),': unit source not found']);
|
||||
exit;
|
||||
end;
|
||||
Code:=CodeToolBoss.LoadFile(FormFilename,true,false);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user