From e6b57414317db717c40b55ad255f74bb7ceb26bd Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 3 Oct 2009 21:16:33 +0000
Subject: [PATCH] clean up

git-svn-id: trunk@22002 -
---
 ide/lazarusidestrconsts.pas | 1 -
 ide/main.pp                 | 4 ++--
 ide/project.pp              | 5 +++++
 3 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas
index 0d4a628573..259078fc28 100644
--- a/ide/lazarusidestrconsts.pas
+++ b/ide/lazarusidestrconsts.pas
@@ -1801,7 +1801,6 @@ resourcestring
   lisRunParamsTheHostApplicationIsNotExecutable = 'The host application %s%s%'
     +'s is not executable.';
   dlgTheDirectory = 'The directory "';
-  dlgDoesNotExist = '" does not exist.';
   dlgTextToFing = '&Text to Find';
   dlgReplaceWith = '&Replace With';
   dlgFROpts = 'Options';
diff --git a/ide/main.pp b/ide/main.pp
index afb260cf4d..edd423119e 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -1847,7 +1847,8 @@ begin
   SourceNotebook.OnViewJumpHistory := @OnSrcNotebookViewJumpHistory;
   SourceNotebook.OnShowSearchResultsView := @OnSrcNotebookShowSearchResultsView;
   SourceNotebook.OnPopupMenu := @OnSrcNoteBookPopupMenu;
-  DebugBoss.ConnectSourceNotebookEvents;  
+  DebugBoss.ConnectSourceNotebookEvents;
+  DebugBoss.SetupSourceMenuShortCuts;
 
   // connect search menu to sourcenotebook
   MainIDEBar.itmSearchFind.OnClick := @SourceNotebook.FindClicked;
@@ -2411,7 +2412,6 @@ end;
 procedure TMainIDE.LoadMenuShortCuts;
 begin
   inherited LoadMenuShortCuts;
-  SourceNotebook.SetupShortCuts;
   DebugBoss.SetupMainBarShortCuts;
 end;
 
diff --git a/ide/project.pp b/ide/project.pp
index 2258be9b1c..90e23a5dfd 100644
--- a/ide/project.pp
+++ b/ide/project.pp
@@ -5384,6 +5384,8 @@ begin
     +'end.'+le
     +le;
   AProject.MainFile.SetSourceText(NewSource);
+
+  //AProject.LazCompilerOptions.UnitOutputDirectory:='lib/$(TargetCPU)-$(TargetOS)';
 end;
 
 function TProjectProgramDescriptor.CreateStartFiles(AProject: TLazProject
@@ -5449,6 +5451,7 @@ begin
   // add lcl pp/pas dirs to source search path
   AProject.AddPackageDependency('LCL');
   AProject.LazCompilerOptions.Win32GraphicApp:=true;
+  //AProject.LazCompilerOptions.UnitOutputDirectory:='lib/$(TargetCPU)-$(TargetOS)';
 end;
 
 function TProjectApplicationDescriptor.CreateStartFiles(AProject: TLazProject
@@ -5900,6 +5903,8 @@ begin
   NewSource.Add('');
   AProject.MainFile.SetSourceText(NewSource.Text);
   NewSource.Free;
+
+  //AProject.LazCompilerOptions.UnitOutputDirectory:='lib/$(TargetCPU)-$(TargetOS)';
 end;
 
 function TProjectConsoleApplicationDescriptor.CreateStartFiles(