summaryrefslogtreecommitdiff
path: root/testautomation/graphics/optional/includes/global
diff options
context:
space:
mode:
authorVladimir Glazunov <vg@openoffice.org>2011-01-31 17:37:26 +0100
committerVladimir Glazunov <vg@openoffice.org>2011-01-31 17:37:26 +0100
commitfd74891f5fd19ae640448c459026fdde22daccfa (patch)
tree6aab9deffaa9233cf8b57b40dc7892310a3158d1 /testautomation/graphics/optional/includes/global
parent00b51f62c76c426558fb7c7584e02c5b04722975 (diff)
parent8305c8ea94cb0bcc79701577087c4ff0c64194f1 (diff)
CWS-TOOLING: integrate CWS automationdev300m97
Diffstat (limited to 'testautomation/graphics/optional/includes/global')
-rw-r--r--testautomation/graphics/optional/includes/global/g_clipboard.inc6
-rw-r--r--testautomation/graphics/optional/includes/global/g_spellcheck.inc10
2 files changed, 2 insertions, 14 deletions
diff --git a/testautomation/graphics/optional/includes/global/g_clipboard.inc b/testautomation/graphics/optional/includes/global/g_clipboard.inc
index d3ff4cdcfea5..8da14643d748 100644
--- a/testautomation/graphics/optional/includes/global/g_clipboard.inc
+++ b/testautomation/graphics/optional/includes/global/g_clipboard.inc
@@ -119,7 +119,7 @@ testcase tiEditUndo
end if
TabPositionAndSize.Cancel
printlog "Close document"
- Call hCloseDocument
+ Call hCloseDocument
sLocaltestfile = hFileGetLocalPath( gTesttoolPath + "leer."+ExtensionString )
printlog sLocaltestfile
if (FileExists (sLocaltestfile)) then
@@ -128,9 +128,7 @@ testcase tiEditUndo
else
warnlog "File is missing."
endif
-
- printlog "Close document"
-
+
endcase 'tiEditUndo
'-------------------------------------------------------------------------------
diff --git a/testautomation/graphics/optional/includes/global/g_spellcheck.inc b/testautomation/graphics/optional/includes/global/g_spellcheck.inc
index c10239e69775..1684738ded35 100644
--- a/testautomation/graphics/optional/includes/global/g_spellcheck.inc
+++ b/testautomation/graphics/optional/includes/global/g_spellcheck.inc
@@ -212,19 +212,9 @@ testcase tiToolsSpellcheckError
end if
end if
- printlog "Close dialog 'Edit Custom Dictionary'."
- BenutzerwoerterbuchBearbeiten.Close
- Kontext "ExtrasOptionenDlg"
- printlog "Close the Option dialog."
- ExtrasOptionenDlg.OK
-
printlog "Close document"
Call hCloseDocument
- ' remove the word again from the dictionary
- delete_word_from_dictionary(sWrongWord,"IgnoreAllList")
-
- kill (convertPath(gOfficePath+"user/work/"+"recht_"+iSprache+sExt))
endcase 'tiToolsSpellcheckCorrect
'-------------------------------------------------------------------------------