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

PoChecker: remove dependency of IDEIntf for standalone version.

Browse Source 
Better fix for issue #0023055.

git-svn-id: trunk@38973 -
This commit is contained in:
bart 2012-10-06 14:49:26 +00:00
parent 9d3dfbf67f
commit 93741ec041
2 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
components/pochecker/Proj/pochecker.lpi
View File

@ -31,16 +31,13 @@
<FormatVersion Value="1"/> <FormatVersion Value="1"/>
</local> </local>
</RunParams> </RunParams>
<RequiredPackages Count="3"> <RequiredPackages Count="2">
<Item1> <Item1>
<PackageName Value="IDEIntf"/> <PackageName Value="SynEdit"/>
</Item1> </Item1>
<Item2> <Item2>
<PackageName Value="SynEdit"/>
</Item2>
<Item3>
<PackageName Value="LCL"/> <PackageName Value="LCL"/>
</Item3> </Item2>
</RequiredPackages> </RequiredPackages>
<Units Count="6"> <Units Count="6">
<Unit0> <Unit0>

6
components/pochecker/pocheckermain.pp
View File

@ -25,9 +25,11 @@ interface
uses uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs,
StdCtrls, LCLProc, CheckLst, Buttons, ExtCtrls, IDEIntf, MenuIntf, StdCtrls, LCLProc, CheckLst, Buttons, ExtCtrls,
{$IFDEF POCHECKERSTANDALONE} {$IFDEF POCHECKERSTANDALONE}
Translations, Translations,
{$ELSE}
IDEIntf, MenuIntf,
{$ENDIF} {$ENDIF}
SimplePoFiles, PoFamilies, ResultDlg, pocheckerconsts; SimplePoFiles, PoFamilies, ResultDlg, pocheckerconsts;
@ -356,7 +358,9 @@ end;
procedure Register; procedure Register;
begin begin
{$IFNDEF POCHECKERSTANDALONE}
RegisterIDEMenuCommand(itmSecondaryTools, 'mnuPoChecker', rsPoChecker, nil, @IDEMenuClicked); RegisterIDEMenuCommand(itmSecondaryTools, 'mnuPoChecker', rsPoChecker, nil, @IDEMenuClicked);
{$ENDIF}
end; end;
end. end.