paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-22 01:39:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Change resource string name, since purpose was altered / prevent accidentality using any outdated translation

Browse Source
This commit is contained in:
Martin 2024-09-28 14:44:04 +02:00
parent 0656b7e4fe
commit a8b85cf2e7
2 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/frames/desktop_options.pas
View File

@ -116,7 +116,7 @@ begin
// language
lblLanguage.Caption := dlgEnvLanguage;
lblLangChangeHint.Caption := dlgEnvLanguageHint;
lblLangChangeHint.Caption := dlgEnvLanguageRestartHint;
// languages: first the automatic, then sorted the rest
sl:=TStringListUTF8Fast.Create;
@ -362,11 +362,11 @@ begin
po := GetLazIdePoFile(EnvironmentOptions.GetParsedLazarusDirectory,
CaptionToLangID(LanguageComboBox.Text));
if po <> nil then begin
s := po.Translate('lazarusidestrconsts.dlgEnvLanguageHint','');
s := po.Translate('lazarusidestrconsts.dlgEnvLanguageRestartHint','Restart the IDE to complete the language change');
if s <> '' then
lblLangChangeHint.Caption := s
else
lblLangChangeHint.Caption := dlgEnvLanguageHint;
lblLangChangeHint.Caption := dlgEnvLanguageRestartHint;
po.Free;
end;
end;

2
ide/lazarusidestrconsts.pas
View File

@ -1247,7 +1247,7 @@ resourcestring
// IDE General options
dlgEnvLanguage = 'Language';
dlgEnvLanguageHint = 'Restart the IDE to complete the language change';
dlgEnvLanguageRestartHint = 'Restart the IDE to complete the language change'; // If changed update the copy in procedure TDesktopOptionsFrame.LanguageComboBoxChange
dlgCheckAndAutoSaveFiles = 'Check and Auto Save Files';
lisAskBeforeSavingProjectSSession = 'Ask before saving project''s session';
lisIfOnlySessionInfoChangedThenAsk = 'If only the session info changed, ask about saving it.';