diff options
Diffstat (limited to 'testautomation/graphics/required/includes/impress/im_002_.inc')
-rw-r--r-- | testautomation/graphics/required/includes/impress/im_002_.inc | 37 |
1 files changed, 21 insertions, 16 deletions
diff --git a/testautomation/graphics/required/includes/impress/im_002_.inc b/testautomation/graphics/required/includes/impress/im_002_.inc index f4741210ce12..935175ca010c 100644 --- a/testautomation/graphics/required/includes/impress/im_002_.inc +++ b/testautomation/graphics/required/includes/impress/im_002_.inc @@ -25,28 +25,33 @@ ' '/************************************************************************ '* -'* Owner : wolfram.garten@sun.com +'* Owner : wolfram.garten@oracle.com '* '* short description : Impress Required Test Library (2) '* '\***************************************************************** +sub im_002_ + + call tiEditDeleteSlide() + +end sub + +'******************************************************************************* + testcase tiEditDeleteSlide -printlog "open application" - Call hNewDocument -printlog "Insert->Slide; press 'OK' " - InsertSlide - sleep 2 - hTypekeys "<Pagedown>" - sleep 2 -printlog "Edit->Delete Slide " - try - EditDeleteSlide - catch - warnlog "Error when deleting slide" - endcatch - Call hCloseDocument -printlog "close application " + + printlog "open application" + Call hNewDocument + printlog "Insert->Slide; press 'OK' " + InsertSlide + WaitSlot( 2000 ) + hTypekeys "<Pagedown>" + printlog "Edit->Delete Slide " + hUseAsyncSlot( "EditDeleteSlide" ) + Call hCloseDocument + printlog "close application " + endcase |