summaryrefslogtreecommitdiff
path: root/testautomation/writer/required/includes/w_007_.inc
diff options
context:
space:
mode:
Diffstat (limited to 'testautomation/writer/required/includes/w_007_.inc')
-rw-r--r--[-rwxr-xr-x]testautomation/writer/required/includes/w_007_.inc21
1 files changed, 9 insertions, 12 deletions
diff --git a/testautomation/writer/required/includes/w_007_.inc b/testautomation/writer/required/includes/w_007_.inc
index 94fa0d70f9f9..64eae48786c5 100755..100644
--- a/testautomation/writer/required/includes/w_007_.inc
+++ b/testautomation/writer/required/includes/w_007_.inc
@@ -84,8 +84,7 @@ testcase tToolsSpellcheck
Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer."
goto endsub
end if
- hFileOpen ( TheFile )
- Call sMakeReadOnlyDocumentEditable
+ hFileOpenLocally( TheFile )
printlog " Insert some faulty text"
select case iSprache
@@ -246,8 +245,7 @@ testcase tToolsThesaurus
Warnlog "Found no Document for the language you're testing in, Please inform the Test-Developer."
goto endsub
end if
- call hFileOpen( TheFile )
- Call sMakeReadOnlyDocumentEditable
+ call hFileOpenLocally( TheFile )
printlog " Insert some faulty text"
select case iSprache
@@ -337,7 +335,7 @@ testcase tToolsHyphenation
Select Case gApplication
Case "WRITER"
- hFileOpen( DieDatei )
+ hFileOpenLocally( DieDatei )
Case "MASTERDOCUMENT"
if wInsertDocumentinMasterDoc(DieDatei) = False then
@@ -354,7 +352,6 @@ testcase tToolsHyphenation
goto endsub
end select
- Call sMakeReadOnlyDocumentEditable
printlog " Insert file 'writer\required\input\linguistik\0 + [OfficeLanguage] + '.odt'"
Sleep 1
Call wTypeKeys ("<Mod1 Home>")
@@ -913,6 +910,7 @@ testcase tToolsUpdate
Call wTypeKeys ("Dieser Text ist zur Aktualisierung")
printlog " Insert / Indexes"
InsertIndexes
+ sleep 1
Kontext "Active"
if ( Active.Exists( 2 ) ) then
@@ -921,7 +919,8 @@ testcase tToolsUpdate
Active.Ok
end if
end if
-
+ Sleep 5
+
Kontext
Active.Setpage TabVerzeichnisseVerzeichnis
@@ -986,8 +985,7 @@ testcase tToolsHangulHanjaConversion
bAsianLanguage = ActiveDeactivateAsianSupport(TRUE)
printlog " Open the test file"
- hFileOpen (sTestFile)
- Call sMakeReadOnlyDocumentEditable
+ hFileOpenLocally(sTestFile)
Call wTypeKeys("<MOD1 Home>")
printlog " Tools / HangulHanjaConversion"
@@ -1126,8 +1124,7 @@ testcase tHtmlDocToolsHangulHanjaConversion
bAsianLanguage = ActiveDeactivateAsianSupport(TRUE)
printlog " Open the test file"
- hFileOpen (sTestFile)
- Call sMakeReadOnlyDocumentEditable
+ hFileOpenLocally(sTestFile)
Call wTypeKeys("<MOD1 Home>")
printlog " Tools / HangulHanjaConversion"
@@ -1238,7 +1235,7 @@ testcase tMasterDocToolsHyphenation
hUseAsyncSlot( "EditPaste" )
end if
- Call sMakeReadOnlyDocumentEditable
+
printlog " Insert file 'writer\required\input\linguistik\0 + [OfficeLanguage] + '.odt'"
Sleep 1
Call wTypeKeys ("<Mod1 Home>")