Make FPC dir relative to $lazarusdir in innosetup Issue #0029041 Marco van de Voort

git-svn-id: trunk@50590 -
This commit is contained in:
martin 2015-12-03 22:51:49 +00:00
parent fff60a4076
commit 2136904400

View File

@ -81,7 +81,7 @@ begin
Content := s;
StringChange(Content, '%Temp%', GetTempDir);
StringChange(Content, '%LazDir%', ExpandConstant('{app}'));
StringChange(Content, '%FpcBinDir%', ExpandConstant('{app}\fpc\{#FPCVersion}\bin\{#FPCFullTarget}\'));
StringChange(Content, '%FpcBinDir%', '$Lazarusdir'+ExpandConstant('\fpc\{#FPCVersion}\bin\{#FPCFullTarget}\'));
SaveStringToFile(FileName, Content, False);
end;