Commits

Anonymous committed 11cfe5b

automationdev300m87#i115106#added neccessary wait

Comments (0)

Files changed (1)

testautomation/writer/optional/includes/shortcut/w_shortcuts.inc

 	Kontext	
 	Active.Setpage TabFont
 	Kontext "TabFont"
+    wait 500
 	DefaultSize = Size.GetSelIndex
 	Size.Select 14 ' Size 20
 	DefaultStyle = Style.GetSelIndex
 	Kontext	
 	Active.Setpage TabFont
 	Kontext "TabFont"
+    wait 500
 	if Size.GetSelIndex <> 14 then
 		Warnlog "formatted word has lost its size"
 	endif
 	Kontext	
 	Active.Setpage TabFont
 	Kontext "TabFont"
+    wait 500
 	if Size.GetSelIndex <>  DefaultSize then
 		Warnlog "formatted word has no default size"
 	endif