summaryrefslogtreecommitdiff
path: root/testautomation/graphics/required/includes/impress/im_002_.inc
diff options
context:
space:
mode:
Diffstat (limited to 'testautomation/graphics/required/includes/impress/im_002_.inc')
-rw-r--r--testautomation/graphics/required/includes/impress/im_002_.inc37
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