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

startlazarus.lpi: clean up

Browse Source 
git-svn-id: trunk@12703 -
This commit is contained in:
mattias 2007-11-02 19:38:47 +00:00
parent cc0a9c67bb
commit 4e7dadcd8b
2 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
ide/main.pp
View File

@ -8434,6 +8434,7 @@ procedure TMainIDE.DoRestart;
var CanClose: boolean; var CanClose: boolean;
begin begin
DebugLn(['TMainIDE.DoRestart ']);
CanClose:=true; CanClose:=true;
MainIDEBar.OnCloseQuery(Self, CanClose); MainIDEBar.OnCloseQuery(Self, CanClose);
if not CanClose then exit; if not CanClose then exit;

10
ide/startlazarus.lpi
View File

@ -2,7 +2,7 @@
<CONFIG> <CONFIG>
<ProjectOptions> <ProjectOptions>
<PathDelim Value="/"/> <PathDelim Value="/"/>
<Version Value="5"/> <Version Value="6"/>
<General> <General>
<SessionStorage Value="InIDEConfig"/> <SessionStorage Value="InIDEConfig"/>
<MainUnit Value="0"/> <MainUnit Value="0"/>
@ -25,7 +25,7 @@
<PackageName Value="LCL"/> <PackageName Value="LCL"/>
</Item1> </Item1>
</RequiredPackages> </RequiredPackages>
<Units Count="4"> <Units Count="3">
<Unit0> <Unit0>
<Filename Value="startlazarus.lpr"/> <Filename Value="startlazarus.lpr"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
@ -36,14 +36,10 @@
<UnitName Value="LazarusManager"/> <UnitName Value="LazarusManager"/>
</Unit1> </Unit1>
<Unit2> <Unit2>
<Filename Value="LRemoteControl"/>
<IsPartOfProject Value="True"/>
</Unit2>
<Unit3>
<Filename Value="lremotecontrol.pas"/> <Filename Value="lremotecontrol.pas"/>
<IsPartOfProject Value="True"/> <IsPartOfProject Value="True"/>
<UnitName Value="LRemoteControl"/> <UnitName Value="LRemoteControl"/>
</Unit3> </Unit2>
</Units> </Units>
</ProjectOptions> </ProjectOptions>
<CompilerOptions> <CompilerOptions>