Adding additional tests for tickets

This commit is contained in:
Diona Kidd 2008-07-29 20:08:28 +00:00
parent d908d53c84
commit 77aec308c1

View file

@ -55,7 +55,7 @@ my $user = WebGUI::User->new($session, 3);
#----------------------------------------------------------------------------
# Tests
plan tests => 22; # Increment this number for each test you create
plan tests => 24; # Increment this number for each test you create
#----------------------------------------------------------------------------
@ -154,6 +154,10 @@ $mech->content_contains(
'Ticket name is displayed',
);
my $tickets = $ems->getTickets;
isa_ok($tickets->[0], 'WebGUI::Asset::Sku::EMSTicket');
ok($tickets->[0]->get('title') eq 'My Ticket', 'getTickets returns newly created ticket');
#----------------------------------------------------------------------------
# getMechLogin( baseUrl, WebGUI::User, "identifier" )
# Returns a Test::WWW::Mechanize session after logging in the given user using