oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

more get and update tests. First test for newByUserId

Browse source
This commit is contained in:
Colin Kuskie 2008-08-14 18:23:46 +00:00
parent 9d4997ff15
commit 538ec8a7f6
1 changed files with 48 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

50
t/Shop/Vendor.t
View file

@ -31,7 +31,7 @@ my $session = WebGUI::Test->session;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
# Tests # Tests
my $tests = 23; my $tests = 30;
plan tests => 1 + $tests; plan tests => 1 + $tests;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
@ -40,7 +40,7 @@ plan tests => 1 + $tests;
my $loaded = use_ok('WebGUI::Shop::Vendor'); my $loaded = use_ok('WebGUI::Shop::Vendor');
my $vendor; my $vendor;
my $fence; my ($fence, $fenceCopy);
my $fenceUser = WebGUI::User->new($session, 'new'); my $fenceUser = WebGUI::User->new($session, 'new');
SKIP: { SKIP: {
@ -154,6 +154,52 @@ my $newProps = {
url => 'http://www.shawshank.com', url => 'http://www.shawshank.com',
}; };
$fence->update($newProps);
is($fence->get('name'), 'Warden Norton', 'get: get name');
is($fence->get('url'), 'http://www.shawshank.com', 'get: updating name did not affect userId');
$newProps->{name} = 'Officer Hadley';
is($fence->get('name'), 'Warden Norton', 'get: No leakage in passing hashref to get');
my $currentProps = $fence->get();
cmp_deeply(
$currentProps,
{
paymentInformation => ignore(),
vendorId => ignore(),
preferredPaymentType => ignore(),
paymentAddressId => ignore(),
dateCreated => ignore(),
url => 'http://www.shawshank.com',
userId => $fenceUser->userId,
name => 'Warden Norton',
},
'get: returns all properties'
);
$currentProps->{name} = 'Jake the Raven';
is($fence->get('name'), 'Warden Norton', 'get: No leakage returned hashref');
#######################################################################
#
# newByUserId
#
#######################################################################
eval { $fenceCopy = WebGUI::Shop::Vendor->newByUserId(); };
$e = Exception::Class->caught();
isa_ok($e, 'WebGUI::Error::InvalidObject', 'newByUserId takes an exception to not giving it a session variable');
cmp_deeply(
$e,
methods(
error => 'Need a session.',
got => '',
expected => 'WebGUI::Session',
),
'create: requires a session variable',
);
} }
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------