paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-06 16:41:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

ide: fix disabling manifest

Browse Source 
git-svn-id: trunk@17945 -
This commit is contained in:
paul 2008-12-25 01:58:21 +00:00
parent 3b8c66ab2a
commit 1b58f6d1c0
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ide/w32manifest.pas
View File

@ -102,9 +102,12 @@ var
begin
Result := True;
if not UseManifest then
Exit;
SetFileNames(MainFilename);
if UseManifest and (not FilenameIsAbsolute(FManifestFileName) or CreateManifestFile) then
if not FilenameIsAbsolute(FManifestFileName) or CreateManifestFile then
begin
ManifestName := ExtractFileName(FManifestFileName);
AResources.AddSystemResource(sManifest + ' "' + ManifestName + '"');