diff --git a/ide/environmentopts.pp b/ide/environmentopts.pp index aba7bbcde3..c6afdd6d9c 100644 --- a/ide/environmentopts.pp +++ b/ide/environmentopts.pp @@ -819,7 +819,7 @@ begin FShowMenuGlyphs := sbgSystem; // files - LazarusDirectory:=IDEProcs.ProgramDirectory(true); + LazarusDirectory:=''; FLazarusDirHistory:=TStringList.Create; CompilerFilename:=''; FCompilerFileHistory:=TStringList.Create; diff --git a/packager/packagesystem.pas b/packager/packagesystem.pas index 485b8e69a0..2cd1780aae 100644 --- a/packager/packagesystem.pas +++ b/packager/packagesystem.pas @@ -2814,7 +2814,7 @@ begin Result:=mrYes; o:=RequiredPackage.GetOutputDirType; if not RequiredPackage.LastCompile[o].StateFileLoaded then begin - DebugLn('TPkgManager.CheckCompileNeedDueToDependencies No state file for ',RequiredPackage.IDAsString); + DebugLn('TPkgManager.CheckCompileNeedDueToDependencies Missing state file for ',RequiredPackage.IDAsString,': ',RequiredPackage.GetStateFilename); exit; end; if StateFileAgemrOk then exit; if not Stats^.StateFileLoaded then begin - DebugLn('TLazPackageGraph.CheckIfCurPkgOutDirNeedsCompile No state file for ',APackage.IDAsString); + DebugLn('TLazPackageGraph.CheckIfCurPkgOutDirNeedsCompile Missing state file for ',APackage.IDAsString,': ',StateFilename); ConfigChanged:=true; exit(mrYes); end;