diff options
author | Vladimir Glazunov <vg@openoffice.org> | 2011-01-31 17:37:26 +0100 |
---|---|---|
committer | Vladimir Glazunov <vg@openoffice.org> | 2011-01-31 17:37:26 +0100 |
commit | fd74891f5fd19ae640448c459026fdde22daccfa (patch) | |
tree | 6aab9deffaa9233cf8b57b40dc7892310a3158d1 /testautomation/graphics/optional/includes/global | |
parent | 00b51f62c76c426558fb7c7584e02c5b04722975 (diff) | |
parent | 8305c8ea94cb0bcc79701577087c4ff0c64194f1 (diff) |
CWS-TOOLING: integrate CWS automationdev300m97
Diffstat (limited to 'testautomation/graphics/optional/includes/global')
-rw-r--r-- | testautomation/graphics/optional/includes/global/g_clipboard.inc | 6 | ||||
-rw-r--r-- | testautomation/graphics/optional/includes/global/g_spellcheck.inc | 10 |
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 '------------------------------------------------------------------------------- |