summaryrefslogtreecommitdiff
path: root/testautomation
diff options
context:
space:
mode:
authorHelge Delfs [hde] <hde@openoffice.org>2010-10-25 10:33:34 +0200
committerHelge Delfs [hde] <hde@openoffice.org>2010-10-25 10:33:34 +0200
commita2c684d93741f296f57b3cddc9e338366e2a2118 (patch)
tree1610fc72808555eef0365e94c485873cd3716f0b /testautomation
parente884f01f281f3ce8b847a0ace0661f32d6c2dfc1 (diff)
automationdev300m87#i115106#added neccessary wait
Diffstat (limited to 'testautomation')
-rw-r--r--[-rwxr-xr-x]testautomation/writer/optional/includes/shortcut/w_shortcuts.inc3
1 files changed, 3 insertions, 0 deletions
diff --git a/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc b/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc
index 0bd84118edc5..22d64c36ed43 100755..100644
--- a/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc
+++ b/testautomation/writer/optional/includes/shortcut/w_shortcuts.inc
@@ -779,6 +779,7 @@ testcase tShortcutPasteUnformattedText
Kontext
Active.Setpage TabFont
Kontext "TabFont"
+ wait 500
DefaultSize = Size.GetSelIndex
Size.Select 14 ' Size 20
DefaultStyle = Style.GetSelIndex
@@ -824,6 +825,7 @@ testcase tShortcutPasteUnformattedText
Kontext
Active.Setpage TabFont
Kontext "TabFont"
+ wait 500
if Size.GetSelIndex <> 14 then
Warnlog "formatted word has lost its size"
endif
@@ -842,6 +844,7 @@ testcase tShortcutPasteUnformattedText
Kontext
Active.Setpage TabFont
Kontext "TabFont"
+ wait 500
if Size.GetSelIndex <> DefaultSize then
Warnlog "formatted word has no default size"
endif