More translations

Redaction/Clean.xba

@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
-<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark50
+<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Clean" script:language="StarBasic">Sub mark51
 
 End Sub
 

Redaction/Configuration.xba

@@ -49,6 +49,10 @@ Private Sub configurationDialog
 	DialogLibraries.LoadLibrary("Redaction")
 	dialog = CreateUnoDialog(DialogLibraries.Redaction.ConfigDialog)
     loadConfigToDialog(dialog)
+    dialog.getControl("CB_complexity").Label = getTranslation("dialogConfigComplexity")
+    dialog.Title = getTranslation("dialogConfigTitle")
+    dialog.getControl("OK").Label = getTranslation("buttonYes")
+    dialog.getControl("CANCEL").Label = getTranslation("buttonStop")
 	dialog.setVisible(true)
 	Select Case dialog.Execute()
     Case 1

Redaction/Translations.xba

@@ -185,6 +185,12 @@ Function getRussian(identifier As String) As String
       Case "validateNumberingSymbol"
          getRussian = "символ"
          Exit Function
+      Case "dialogConfigComplexity"
+         getRussian = "Включить режим эксперта"
+         Exit Function
+      Case "dialogConfigTitle"
+         getRussian = "Настройка чистки и проверки"
+         Exit Function
 	  Case Else
 	    getRussian = "Перевод не найден"
 	End Select  
@@ -361,6 +367,12 @@ Function getEnglish(identifier As String) As String
       Case "validateNumberingSymbol"
          getEnglish = "symbol"
          Exit Function
+      Case "dialogConfigComplexity"
+         getEnglish = "Enable advanced mode"
+         Exit Function
+      Case "dialogConfigTitle"
+         getEnglish = "Clean and validation configuration"
+         Exit Function
 	  Case Else
 	    getEnglish = "No translation"
 	End Select