diff --git a/lcl/lazhelphtml.pas b/lcl/lazhelphtml.pas index 6e9a54fcd0..7efb54f7c0 100644 --- a/lcl/lazhelphtml.pas +++ b/lcl/lazhelphtml.pas @@ -387,15 +387,9 @@ procedure THTMLBrowserHelpViewer.FindDefaultBrowser(var Browser, function Find(const ShortFilename: string): boolean; var - Ext: String; Filename: String; begin - {$IFDEF MSWindows} - Ext:='.exe'; - {$ELSE} - Ext:=''; - {$ENDIF} - Filename:=SearchFileInPath(ShortFilename+Ext,'', + Filename:=SearchFileInPath(ShortFilename+GetExeExt,'', SysUtils.GetEnvironmentVariable('PATH'),PathSeparator, [sffDontSearchInBasePath]); Result:=Filename<>'';