From 805858abd75a2511fbcb74f329bd77bfcffe5b4b Mon Sep 17 00:00:00 2001
From: Maxim Ganetsky <maxim@lazarus-ide.org>
Date: Tue, 12 Sep 2023 20:14:33 +0300
Subject: [PATCH] IDE: localized "Major changes detected" dialog

---
 ide/lazarusidestrconsts.pas | 6 ++++++
 ide/main.pp                 | 8 ++++----
 2 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas
index 0f76a9426f..4ec8c3a22a 100644
--- a/ide/lazarusidestrconsts.pas
+++ b/ide/lazarusidestrconsts.pas
@@ -851,6 +851,12 @@ resourcestring
   lisNotNow = 'Not now';
   lisYouCanNotBuildLazarusWhileDebuggingOrCompiling = 'You cannot build '
     +'Lazarus while debugging or compiling.';
+  lisMajorChangesDetected = 'Major changes detected';
+  lisTheLazarusSourcesUse = 'The Lazarus sources use a different list of base '
+    +'packages.%sIt is recommended to compile the IDE clean using lazbuild.';
+  lisCleanUpLazbuild = 'Clean up + lazbuild';
+  lisLazbuild = 'lazbuild';
+  lisCompileNormally = 'Compile normally';
   lisReadError = 'Read Error';
   lisUnableToReadFile = 'Unable to read file';
   lisUnableToReadFile2 = 'Unable to read file "%s".';
diff --git a/ide/main.pp b/ide/main.pp
index aeef5ea21e..625fe0dd2d 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -7934,10 +7934,10 @@ begin
     ErrMsg:=PackageGraph.SrcBasePackagesNeedLazbuild;
     if ErrMsg<>'' then
     begin
-      r:=IDEQuestionDialog('Major changes detected',
-        'The Lazarus sources use a different list of base packages.'+LineEnding
-        +'It is recommended to compile the IDE clean using lazbuild.',
-        mtConfirmation,[mrYes,'Clean up + lazbuild',21,'lazbuild',mrIgnore,'Compile normally',mrCancel]);
+      r:=IDEQuestionDialog(lisMajorChangesDetected,
+        Format(lisTheLazarusSourcesUse, [LineEnding]),
+        mtConfirmation, [mrYes, lisCleanUpLazbuild, 21, lisLazbuild, mrIgnore,
+          lisCompileNormally, mrCancel]);
       case r of
       mrYes:
         exit(fBuilder.MakeIDEUsingLazbuild(true));