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

IDE: don't show define and undefine options (-d, -u) in all options GUI.

Browse Source 
git-svn-id: trunk@42266 -
This commit is contained in:
juha 2013-08-02 12:07:47 +00:00
parent 7c8559a56e
commit a0e94b7c8f
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ide/compiler.pp
View File

@ -418,9 +418,10 @@ end;
function IsIgnoredOption(aOpt: string): Boolean;
begin
if Length(aOpt) < 2 then Exit(False);
// Ignore : all file names and paths
// executable path
Result := aOpt[2] in ['F', 'e'];
// Ignore : * all file names and paths
// * executable path
// * define and undefine
Result := aOpt[2] in ['F', 'e', 'd', 'u'];
end;
{ TCompilerOpt }