|
|
@@ -28,15 +28,17 @@ procedure ide_check_gdb_availability(Sender: TObject);
|
|
|
Cmd:=ExeSearch(AddProgramExtension('git',Defaults.OS),{$IFDEF FPC_DOTTEDUNITS}System.{$ENDIF}SysUtils.GetEnvironmentVariable('PATH'));
|
|
|
Opts:=TStringList.Create;
|
|
|
try
|
|
|
- Opts.Add('log');
|
|
|
- Opts.Add('-1');
|
|
|
- Opts.Add('--pretty=%cd');
|
|
|
- Opts.Add('--date=format:%Y/%m/%d');
|
|
|
- CompilerGitDate:=Installer.BuildEngine.GetExecuteCommandOutput(Cmd,Opts);
|
|
|
- while (length(CompilerGitDate)>0) and (CompilerGitDate[length(CompilerGitDate)] in [#10,#13]) do
|
|
|
- SetLength(CompilerGitDate,length(CompilerGitDate)-1);
|
|
|
- except
|
|
|
- CompilerGitDate:={$IFDEF FPC_DOTTEDUNITS}System.{$ENDIF}SysUtils.GetEnvironmentVariable('COMPDATESTR');
|
|
|
+ try
|
|
|
+ Opts.Add('log');
|
|
|
+ Opts.Add('-1');
|
|
|
+ Opts.Add('--pretty=%cd');
|
|
|
+ Opts.Add('--date=format:%Y/%m/%d');
|
|
|
+ CompilerGitDate:=Installer.BuildEngine.GetExecuteCommandOutput(Cmd,Opts);
|
|
|
+ while (length(CompilerGitDate)>0) and (CompilerGitDate[length(CompilerGitDate)] in [#10,#13]) do
|
|
|
+ SetLength(CompilerGitDate,length(CompilerGitDate)-1);
|
|
|
+ except
|
|
|
+ CompilerGitDate:={$IFDEF FPC_DOTTEDUNITS}System.{$ENDIF}SysUtils.GetEnvironmentVariable('COMPDATESTR');
|
|
|
+ end;
|
|
|
finally
|
|
|
Opts.Free;
|
|
|
end;
|