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

IDE: fall back package output directory: set dir separators not

Browse Source 
git-svn-id: trunk@37024 -
This commit is contained in:
mattias 2012-04-25 19:13:10 +00:00
parent d853ab2e28
commit a5d49673a3
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/project.pp
View File

@ -5045,7 +5045,7 @@ begin
XMLConfig.SetValue('Compiler/Date',CompilerFileDate);
XMLConfig.SetValue('Params/Value',CompilerParams);
XMLConfig.SetDeleteValue('Complete/Value',Complete,true);
InvalidateFileStateCache;
InvalidateFileStateCache(StateFile);
XMLConfig.Flush;
finally
XMLConfig.Free;

2
packager/packagesystem.pas
View File

@ -3959,7 +3959,7 @@ begin
// use the default output directory, if it is relative
// (this way the fallback creates the same amount of target directories)
Dir:=APackage.CompilerOptions.ParsedOpts.Values[pcosOutputDir].UnparsedValue;
Dir:=SetDirSeparators(APackage.SubstitutePkgMacros(Dir,false));
Dir:=APackage.SubstitutePkgMacros(Dir,false);
if FilenameIsAbsolute(Dir) then begin
// it is not relative => create a default one
Dir:='$(TargetOS)-$(TargetCPU)';