diff options
author | Vladimir Glazunov <vg@openoffice.org> | 2010-11-09 15:38:59 +0100 |
---|---|---|
committer | Vladimir Glazunov <vg@openoffice.org> | 2010-11-09 15:38:59 +0100 |
commit | 613bb74489551580b417968af125de803c684a39 (patch) | |
tree | 42fd8b2212b4f249de0364fb3f82e3e105b6299d /testautomation | |
parent | 115b65c7b7cc8a2d69ac17bd0fb0730c9f388d0b (diff) | |
parent | 46996f043c1a283773b16fc86b3550c7cf14588f (diff) |
CWS-TOOLING: integrate CWS fwk149
Diffstat (limited to 'testautomation')
-rw-r--r-- | testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc b/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc index 75db278c25ef..729659dfc54d 100644 --- a/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc +++ b/testautomation/writer/optional/includes/contextmenu/w_contextmenu1.inc @@ -194,7 +194,14 @@ testcase tPickGraphic Call wOpenContextMenu(true) printlog " Select 'ImageMap' in context menu" - Call hMenuSelectNr(9) + try + CALL hMenuFindSelect (".uno:ImageMapDialog", true, 11, true) 'Find "ImageMap" and call the slot. + wait 500 + catch + Warnlog "Unable to open context menu" + Call hCloseDocument + goto endsub + endcatch Printlog " The graphic has to be selected and the context menu has to show graphics related commands" Kontext "ImageMapEditor" if Not ImageMapEditor.Exists(3) then @@ -240,13 +247,13 @@ testcase tPickHyperlink printlog " Empty clipboard" SetClipBoard = "" printlog " Insert a hyperlink in document" - Call wTypeKeys "www.sun.com" + Call wTypeKeys "www.oracle.com" Call wTypeKeys " " Call wTypeKeys "<HOME>" printlog " Open context menu on hyperlink" Call wTypeKeys "<SHIFT F10>" printlog " Last entry in menu has to be 'Open hyperlink' ...." - CALL hMenuFindSelect (10955, true, 17, true) 'Find "Hyperlink-dialog" and call the slot. + CALL hMenuFindSelect (10955, false, 17, true) 'Find "Hyperlink-dialog" and call the slot. kontext "TabHyperlinkInternet" if TabHyperlinkInternet.Exists(3) then Warnlog "Hyperlink-Dialog opened!" |