summaryrefslogtreecommitdiff
path: root/testautomation/writer/required/includes/w_005_.inc
diff options
context:
space:
mode:
Diffstat (limited to 'testautomation/writer/required/includes/w_005_.inc')
-rwxr-xr-x[-rw-r--r--]testautomation/writer/required/includes/w_005_.inc43
1 files changed, 42 insertions, 1 deletions
diff --git a/testautomation/writer/required/includes/w_005_.inc b/testautomation/writer/required/includes/w_005_.inc
index 830ce39adc24..93fe9ac0237b 100644..100755
--- a/testautomation/writer/required/includes/w_005_.inc
+++ b/testautomation/writer/required/includes/w_005_.inc
@@ -232,14 +232,55 @@ testcase tFormatChangeCase
printlog " Open new document"
Call hNewDocument
printlog " Insert some text in document and select text"
- Call wTypeKeys ("Hello World!")
+ Call wTypeKeys ("call him now ! please")
Call wTypeKeys ("<Shift Home>")
printlog " Format / Case Characters / Upper"
hUseAsyncSlot( "FormatChangeCaseUpper" )
+ EditCopy
+ if GetClipboardtext() <> "CALL HIM NOW ! PLEASE" then
+ Warnlog "Sentence not 'CALL HIM NOW ! PLEASE' but " & GetClipboardtext()
+ else
+ printlog " " & GetClipboardtext()
+ endif
printlog " Format / Case Characters / Lower"
hUseAsyncSlot( "FormatChangeCaseLower" )
+ EditCopy
+ if GetClipboardtext() <> "call him now ! please" then
+ Warnlog "Sentence not 'call him now ! please' but " & GetClipboardtext()
+ else
+ printlog " " & GetClipboardtext()
+ endif
+
+ printlog " Format / Case Characters / Sentence Case"
+ FormatChangeCaseToSentence
+ EditCopy
+ if GetClipboardtext() <> "Call him now ! Please" then
+ Warnlog "Sentence not 'Call him now ! Please' but " & GetClipboardtext()
+ else
+ printlog " " & GetClipboardtext()
+ endif
+
+ printlog " Format / Case Characters / Capitalize every word"
+ FormatChangeCaseCapitalizeEveryWord
+ EditCopy
+ if GetClipboardtext() <> "Call Him Now ! Please" then
+ Warnlog "Sentence not 'Call Him Now ! Please' but " & GetClipboardtext()
+ else
+ printlog " " & GetClipboardtext()
+ endif
+
+
+ printlog " Format / Case Characters / tOGGLE cASE"
+ FormatChangeCaseToggleCase
+ EditCopy
+ if GetClipboardtext() <> "cALL hIM nOW ! pLEASE" then
+ Warnlog "Sentence not 'cALL hIM nOW ! pLEASE' but " & GetClipboardtext()
+ else
+ printlog " " & GetClipboardtext()
+ endif
+
if ( gAsianSup ) then
try