paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-11 13:59:14 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazBuild: actually handle --language option when outputting help

Browse Source
This commit is contained in:
Maxim Ganetsky 2024-01-21 16:27:01 +03:00
parent 1db4e6beff
commit 416bdc5c19
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/lazbuild.lpr
View File

@ -1801,6 +1801,8 @@ begin
end;
procedure TLazBuildApplication.WriteUsage;
var
CustomLang: string;
const
cDescrIndent = 16;
cMaxLength = 80;
@ -1811,7 +1813,9 @@ const
end;
begin
TranslateResourceStrings(ProgramDirectoryWithBundle,'');
if LazBuildApp.HasOption('language') then
CustomLang:=LazBuildApp.GetOptionValue('language');
TranslateResourceStrings(ProgramDirectoryWithBundle,CustomLang);
writeln('');
writeln(lisLazbuildOptionsSyntax);
writeln('');