1 files changed, 43 insertions, 43 deletions

diff --git a/testautomation/graphics/optional/includes/global/g_autocorrection.inc b/testautomation/graphics/optional/includes/global/g_autocorrection.inc
index 21cda12dc6f4..bceff84e9f5b 100755
--- a/testautomation/graphics/optional/includes/global/g_autocorrection.inc
+++ b/testautomation/graphics/optional/includes/global/g_autocorrection.inc
@@ -217,15 +217,15 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - replace quotes" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Check
+        SingleQuotesReplace.Check
     else
-        DoppelteErsetzen.Check
-        DoppeltStandard.Click
+        DoubleQuotesReplace.Check
+        DoubleQuotesDefault.Click
     endif
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 5
     gMouseClick 50,50
     sleep 5
@@ -252,14 +252,14 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - dont replace quotes" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    Active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    Active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Uncheck
+        SingleQuotesReplace.Uncheck
     else
-        DoppelteErsetzen.Uncheck
+        DoubleQuotesReplace.Uncheck
     endif
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 1
     gMouseClick 50,50
     sleep 1
@@ -285,14 +285,14 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - replace quotes" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Check
-        EinfachWortAnfang.Click
+        SingleQuotesReplace.Check
+        SingleQuotesStart.Click
     else
-        DoppelteErsetzen.Check
-        DoppeltWortAnfang.Click
+        DoubleQuotesReplace.Check
+        DoubleQuotesStart.Click
     endif
     Kontext "Sonderzeichen"
     sleep 1
@@ -301,11 +301,11 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     sleep 1
     Sonderzeichen.OK
 
-    Kontext "TabTypografisch"
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfachWortEnde.Click
+        SingleQuotesEnd.Click
     else
-        DoppeltWortEnde.Click
+        DoubleQuotesEnd.Click
     endif
     Kontext "Sonderzeichen"
     sleep 1
@@ -314,8 +314,8 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     sleep 1
     Sonderzeichen.OK
 
-    Kontext "TabTypografisch"
-    TabTypografisch.OK
+    Kontext "TabLocalizedOptions"
+    TabLocalizedOptions.OK
     sleep 5
     gMouseClick 50,50
     sleep 5
@@ -341,17 +341,17 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
     Printlog "   - back to standard" '------------------------------------------------------------------------------------------
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.Check
-        EinfachStandard.Click
+        SingleQuotesReplace.Check
+        SingleQuotesDefault.Click
     else
-        DoppelteErsetzen.Check
-        DoppeltStandard.Click
+        DoubleQuotesReplace.Check
+        DoubleQuotesDefault.Click
     endif
 
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 1
     hTextrahmenErstellen ( Normal$ + "Hello" + Normal$ + " ",20,20,60,30)
     sleep 2
@@ -374,14 +374,14 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
 
     ToolsAutocorrect
     Kontext
-    active.SetPage TabTypografisch
-    Kontext "TabTypografisch"
+    active.SetPage TabLocalizedOptions
+    Kontext "TabLocalizedOptions"
     if bSimple then
-        EinfacheErsetzen.UnCheck
+        SingleQuotesReplace.UnCheck
     else
-        DoppelteErsetzen.UnCheck
+        DoubleQuotesReplace.UnCheck
     endif
-    TabTypografisch.OK
+    TabLocalizedOptions.OK
     sleep 1
 
     hCloseDocument
@@ -390,7 +390,7 @@ endcase
 '-------------------------------------------------------------------------------
 testcase tToolsAutocorrectOption
 
-    const cEntryCount = 9
+    const cEntryCount = 7
     dim i as integer
     dim iEntryCount as integer
     dim sEntries (20, 2) as string
@@ -407,14 +407,14 @@ testcase tToolsAutocorrectOption
     sEntries (4,2) = "*Hello* " '"_Hello_ "
     sEntries (5,1) = "URL Recognition"
     sEntries (5,2) = "It is www.ksta.de "
-    sEntries (6,1) = "Replace 1st... with 1^st..."
-    sEntries (6,2) = "1st "
-    sEntries (7,1) = "Replace 1/2 ... with û ..."
-    sEntries (7,2) = "1/2 "
-    sEntries (8,1) = "Replace dashes"
-    sEntries (8,2) = "Hello - Hrbert "
-    sEntries (9,1) = "Ignore double spaces"
-    sEntries (9,2) = "Hello  this is 2  blanks "
+    'sEntries (6,1) = "Replace 1st... with 1^st..."
+    'sEntries (6,2) = "1st "
+    'sEntries (7,1) = "Replace 1/2 ... with û ..."
+    'sEntries (7,2) = "1/2 "
+    sEntries (6,1) = "Replace dashes"
+    sEntries (6,2) = "Hello - Hrbert "
+    sEntries (7,1) = "Ignore double spaces"
+    sEntries (7,2) = "Hello  this is 2  blanks "
 
     Printlog "- Tools / Autocorrect -options"
     Call hNewDocument()