|
|
@@ -982,12 +982,6 @@ begin
|
|
|
PrevVersion := Copy(PrevVersion, 1, 5);
|
|
|
end;
|
|
|
|
|
|
- Completeness := LanguageCompleteness(ActiveLanguage);
|
|
|
- if (Completeness < 100) and (not WizardSilent) then
|
|
|
- begin
|
|
|
- ShowMessage(FmtMessage(CustomMessage('IncompleteTranslation'), [IntToStr(Completeness)]));
|
|
|
- end;
|
|
|
-
|
|
|
ProcessMissingTranslations(@CollectNames);
|
|
|
|
|
|
WizardForm.KeyPreview := True;
|
|
|
@@ -1053,6 +1047,13 @@ begin
|
|
|
end;
|
|
|
end;
|
|
|
|
|
|
+ // Only after elevating, not to show the message twice
|
|
|
+ Completeness := LanguageCompleteness(ActiveLanguage);
|
|
|
+ if (Completeness < 100) and (not WizardSilent) then
|
|
|
+ begin
|
|
|
+ ShowMessage(FmtMessage(CustomMessage('IncompleteTranslation'), [IntToStr(Completeness)]));
|
|
|
+ end;
|
|
|
+
|
|
|
// installation type page
|
|
|
|
|
|
SetupTypePage := CreateCustomPage(wpLicense,
|