From c2f59b31e37d73eb281eb9378e158b81043f73d6 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Mon, 10 Jan 2011 13:29:22 +0000
Subject: [PATCH] lazbuild: fixed compilation

git-svn-id: trunk@28933 -
---
 ide/lazbuild.lpr      | 25 -------------------------
 ide/msgquickfixes.pas |  2 +-
 2 files changed, 1 insertion(+), 26 deletions(-)

diff --git a/ide/lazbuild.lpr b/ide/lazbuild.lpr
index 5c9175ddd1..1ca3b7d8fe 100644
--- a/ide/lazbuild.lpr
+++ b/ide/lazbuild.lpr
@@ -67,8 +67,6 @@ type
                                             out Description: string);
     procedure GetDependencyOwnerDirectory(Dependency: TPkgDependency;
                                           out Directory: string);
-    procedure GetWritablePkgOutputDirectory(APackage: TLazPackage;
-                                            var AnOutDirectory: string);
     // package graph
     procedure PackageGraphAddPackage(Pkg: TLazPackage);
     
@@ -217,28 +215,6 @@ begin
   GetDirectoryOfDependencyOwner(Dependency,Directory);
 end;
 
-procedure TLazBuildApplication.GetWritablePkgOutputDirectory(
-  APackage: TLazPackage; var AnOutDirectory: string);
-var
-  NewOutDir: String;
-begin
-  if DirectoryIsWritableCached(AnOutDirectory) then exit;
-
-  ForceDirectory(AnOutDirectory);
-  InvalidateFileStateCache;
-  if DirectoryIsWritableCached(AnOutDirectory) then exit;
-  //debugln('TPkgManager.GetWritablePkgOutputDirectory AnOutDirectory=',AnOutDirectory,' ',dbgs(DirectoryIsWritable(AnOutDirectory)));
-
-  // output directory is not writable
-  // -> redirect to config directory
-  NewOutDir:=SetDirSeparators('/$(TargetCPU)-$(TargetOS)');
-  IDEMacros.SubstituteMacros(NewOutDir);
-  NewOutDir:=TrimFilename(GetPrimaryConfigPath+PathDelim+'lib'+PathDelim
-                          +APackage.Name+NewOutDir);
-  AnOutDirectory:=NewOutDir;
-  //debugln('TPkgManager.GetWritablePkgOutputDirectory APackage=',APackage.IDAsString,' AnOutDirectory="',AnOutDirectory,'"');
-end;
-
 procedure TLazBuildApplication.PackageGraphAddPackage(Pkg: TLazPackage);
 begin
   if FileExists(Pkg.FileName) then PkgLinks.AddUserLink(Pkg);
@@ -850,7 +826,6 @@ procedure TLazBuildApplication.SetupPackageSystem;
 begin
   OnGetDependencyOwnerDescription:=@GetDependencyOwnerDescription;
   OnGetDependencyOwnerDirectory:=@GetDependencyOwnerDirectory;
-  OnGetWritablePkgOutputDirectory:=@GetWritablePkgOutputDirectory;
 
   // package links
   PkgLinks:=TPackageLinks.Create;
diff --git a/ide/msgquickfixes.pas b/ide/msgquickfixes.pas
index fea3f4e744..067493ec9b 100644
--- a/ide/msgquickfixes.pas
+++ b/ide/msgquickfixes.pas
@@ -259,7 +259,7 @@ begin
   RegisterIDEMsgQuickFix(TQuickFixIdentifierNotFoundAddLocal.Create);
   RegisterIDEMsgQuickFix(TQuickFixLocalVariableNotUsed_Remove.Create);
   RegisterIDEMsgQuickFix(TQuickFixHint_Hide.Create);
-  //RegisterIDEMsgQuickFix(TQuickFixRecompilingChecksumChanged.Create);
+  RegisterIDEMsgQuickFix(TQuickFixRecompilingChecksumChanged.Create);
 end;
 
 procedure FreeStandardIDEQuickFixItems;