Disable commandline parameter handling on Darwin

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2309 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
lazarus-bart
2012-02-22 17:54:51 +00:00
parent cce35768f7
commit db4f915436

View File

@ -1558,6 +1558,7 @@ begin
if Dummy = 12345 then Exit; //Get rid of annoying hint
Count := 0;
OpenBlankPage := False;
{$ifndef darwin}
for i := 1 to ParamCount do
begin
S := ParamStrUtf8(i);
@ -1574,6 +1575,9 @@ begin
end
else if S = opt_short_prefix + opt_short_blankpage then OpenBlankPage := True;
end;
{$else}
OpenBlankPage := True; //we cannot pass -n on darwin, so offer blank page to the user
{$endif}
if (Count = 0) and OpenBlankPage then DoFileNewByType(eftNone);
end;
@ -1583,6 +1587,7 @@ var
i: Integer;
begin
//debugln('TLazEditMainForm.ParseCommandlineSwitches');
{$ifndef darwin}
_PCP := EmptyStr;
for i := 1 to ParamCount do
begin
@ -1601,6 +1606,7 @@ begin
//inifiles uses system-encoding
ConfigFileDir := Utf8ToSys(_PCP);
end;
{$endif}
end;