← Back to branch summary

~ubuntu-branches/ubuntu/saucy/lazarus/saucy

« back to all changes in this revision

Viewing changes to ide/environmentopts.pp

  • Committer: Package Import Robot
  • Author(s): Paul Gevers, Abou Al Montacir, Paul Gevers
  • Date: 2013-06-22 13:31:45 UTC
  • mfrom: (1.1.10)
  • Revision ID: package-import@ubuntu.com-20130622133145-kf2awlf322usnrfv
Tags: 1.0.10+dfsg-1
http://bugs.debian.org/712834
[ Abou Al Montacir ]
* New upstream maintenance release offering many fixes improving the IDE and
  the LCL stability level.
  - The detailed list of changes can be found here:
    http://wiki.lazarus.freepascal.org/Lazarus_1.0_fixes_branch#Fixes_for_1.0.10
* Use compiler configuration file to pass debian custom compiler flags.
* Recover FTBFS on arm machines fix, dropped unintentionally when upgrading
  to 1.0.8. QT4 based LCL WS could not use QTOPIA. (Closes: Bug#712834)
* Update copyright notice to highlight that upstream source where repacked.

[ Paul Gevers ]
* Update Standard to 3.9.4 (no changes needed)
* Remove obsolete DM-Upload-Allowed
* Update lintian overrides
* Add myself to uploaders
* Update Vsc-Browser URL to the browse interface

Show diffs side-by-side

added added

removed removed

Lines of Context:
ide/environmentopts.pp
332
332
    FNewUnitTemplate: string;
333
333
    FFileDialogFilter: string;
334
334
 
 
335
    // Prevent repopulating Recent project files menu with example projects if it was already cleared up.
 
336
    FAlreadyPopulatedRecentFiles : Boolean;
 
337
 
335
338
    function GetCompilerFilename: string;
336
339
    function GetCompilerMessagesFilename: string;
337
340
    function GetDebuggerEventLogColors(AIndex: TDBGEventType): TDebuggerEventLogColor;
1254
1257
      LoadRecentList(XMLConfig,FRecentPackageFiles,
1255
1258
        Path+'Recent/PackageFiles/',rltFile);
1256
1259
 
 
1260
      FAlreadyPopulatedRecentFiles := XMLConfig.GetValue(Path+'Recent/AlreadyPopulated', false);
 
1261
 
1257
1262
      // Add example projects to an empty project list if examples have write access
1258
 
      if FRecentProjectFiles.count=0 then begin
 
1263
      if (FRecentProjectFiles.count=0) and (not FAlreadyPopulatedRecentFiles) then begin
1259
1264
        AddRecentProjectInitial('examples/jpeg/',          'jpegexample.lpi');
1260
1265
        AddRecentProjectInitial('examples/sprites/',       'spriteexample.lpi');
1261
1266
        AddRecentProjectInitial('examples/openglcontrol/', 'openglcontrol_demo.lpi');
1262
1267
        AddRecentProjectInitial('examples/barchart/',      'chartdemo.lpi');
1263
1268
        AddRecentProjectInitial('examples/',               'hello.lpi');
 
1269
        FAlreadyPopulatedRecentFiles := True;
1264
1270
      end;
1265
1271
 
1266
1272
      // external tools
1590
1596
      SaveRecentList(XMLConfig,FRecentPackageFiles,
1591
1597
        Path+'Recent/PackageFiles/');
1592
1598
 
 
1599
      XMLConfig.SetValue(Path+'Recent/AlreadyPopulated', FAlreadyPopulatedRecentFiles);
 
1600
 
1593
1601
      // external tools
1594
1602
      fExternalTools.Save(FConfigStore,Path+'ExternalTools/');
1595
1603