summaryrefslogtreecommitdiff
path: root/testautomation/graphics/optional/includes/global/g_autocorrection.inc
diff options
context:
space:
mode:
Diffstat (limited to 'testautomation/graphics/optional/includes/global/g_autocorrection.inc')
-rw-r--r--testautomation/graphics/optional/includes/global/g_autocorrection.inc22
1 files changed, 8 insertions, 14 deletions
diff --git a/testautomation/graphics/optional/includes/global/g_autocorrection.inc b/testautomation/graphics/optional/includes/global/g_autocorrection.inc
index 731c9e0ed21f..42e3bc745ab4 100644
--- a/testautomation/graphics/optional/includes/global/g_autocorrection.inc
+++ b/testautomation/graphics/optional/includes/global/g_autocorrection.inc
@@ -38,13 +38,6 @@
'*
'\*******************************************************************
-' Tools->Autocorrect...
-' Replace; Exceptions; Options; Custom Quotes
-' these are Language
-' dependant in the
-' listbox above!!
-' box only enabled, if the both tabpages are selected ...
-
testcase tToolsAutocorrectReplace
dim i as integer
@@ -76,7 +69,9 @@ testcase tToolsAutocorrectReplace
TabErsetzung.OK
hCloseDocument
-endcase
+endcase 'tToolsAutocorrectReplace
+
+'-------------------------------------------------------------------------------
testcase tToolsAutocorrectExceptions
dim i as integer
@@ -119,9 +114,10 @@ testcase tToolsAutocorrectExceptions
TabAusnahmen.OK
hCloseDocument
-endcase
+endcase 'tToolsAutocorrectExceptions
'-------------------------------------------------------------------------------
+
testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
' bSinple = true: use simple quotes ;; else Double Quotes
@@ -151,8 +147,6 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
warnlog "The language-file was not found or accessible! The test ends."
goto endsub
endif
-
- 'HDE has same problems in w_106a.inc ;-) !!! migrate ?!?! ///'
Call hNewDocument
hFileOpen sFileName
@@ -381,7 +375,7 @@ testcase tToolsAutocorrectCustomQuotes(bSimple as boolean)
sleep 1
hCloseDocument
-endcase
+endcase 'tToolsAutocorrectCustomQuotes
'-------------------------------------------------------------------------------
testcase tToolsAutocorrectOption
@@ -455,6 +449,6 @@ testcase tToolsAutocorrectOption
hCloseDocument
sleep 1
-endcase
+endcase 'tToolsAutocorrectOption
-'-------------------------------------------------------------------------------
+'------------------------------------------------------------------------------- \ No newline at end of file