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

IDE: clean up

Browse Source 
git-svn-id: trunk@17977 -
This commit is contained in:
mattias 2008-12-29 10:46:46 +00:00
parent 306d26ad9a
commit df78688646
2 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/compoptsmodes.pas
View File

@ -285,7 +285,6 @@ procedure TCompOptConditionals.CreateDiff(CompOpts: TLazCompOptConditionals;
i: Integer;
OldPath: String;
begin
DebugLn(['Diff Cur=',CurNode.Value,' Other=',OtherNode.Value,' Cur=',dbgs(CurNode),' Other=',dbgs(OtherNode)]);
Tool.AddDiff('NodeType',COCNodeTypeNames[CurNode.NodeType],COCNodeTypeNames[OtherNode.NodeType]);
Tool.AddDiff('ValueType',COCValueTypeNames[CurNode.ValueType],COCValueTypeNames[OtherNode.ValueType]);
Tool.AddDiff('Value',CurNode.Value,OtherNode.Value);
@ -302,7 +301,6 @@ procedure TCompOptConditionals.CreateDiff(CompOpts: TLazCompOptConditionals;
end;
begin
DebugLn(['TCompOptConditionals.CreateDiff Self=',dbgs(Self),' CompOpts=',dbgs(CompOpts)]);
Diff(Root,CompOpts.Root);
end;

4
packager/pkgoptionsdlg.pas
View File

@ -41,8 +41,8 @@ uses
Classes, SysUtils, FileUtil, LCLProc, Forms, Controls, Buttons, LResources,
ExtCtrls, StdCtrls, Spin, Dialogs, PathEditorDlg, IDEProcs, IDEWindowIntf,
IDEDialogs, MacroIntf,
LazarusIDEStrConsts, BrokenDependenciesDlg, PackageDefs, PackageSystem,
CompilerOptions;
LazarusIDEStrConsts,
BrokenDependenciesDlg, PackageDefs, PackageSystem, CompilerOptions;
type