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

Convert variants over to the new collateral API.

Browse source 
Convert the upgrade script to the new API.
Fix a few bugs in the collateral API with "empty" collateral Ids
and add tests for it.
This commit is contained in:
Colin Kuskie 2008-05-18 23:44:43 +00:00
parent d8f12c4c9f
commit affd08990a
3 changed files with 36 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

14
t/Asset/Sku/ProductCollateral.t
View file

@ -35,7 +35,7 @@ my $session = WebGUI::Test->session;
#----------------------------------------------------------------------------
# Tests
plan tests => 29; # Increment this number for each test you create
plan tests => 32; # Increment this number for each test you create
#----------------------------------------------------------------------------
# put your tests here
@ -50,6 +50,7 @@ ok(! exists $product->{_collateral}, 'object cache does not exist yet');
my $vid = $product->setCollateral('variantsJSON', 'vid', 'new', {a => 'aye', b => 'bee'});
isa_ok($product->{_collateral}, 'HASH', 'object cache created for collateral');
isnt($vid, 'new', 'setCollateral assigns a new id to collateral without one');
ok($session->id->valid($vid), 'a valid id was generated for the new collateral entry');
my $json;
@ -267,11 +268,14 @@ my $product4 = $root->addChild({
title => "Pinch a loaf",
});
my $bareVid = $product4->setCollateral('variantsJSON', 'vid', 'new', { major => 'problem' });
isnt($bareVid, 'new', 'setCollateral assigns a new id to collateral without one');
my $newVid;
$newVid = $product4->setCollateral('variantsJSON', 'vid', 'new', { major => 'problem', vid => 'new' });
isnt($newVid, 'new', 'setCollateral assigns a new id to collateral with an id of "new"...');
ok($session->id->valid($newVid), '... and it is a valid GUID');
my $newVid = $product4->setCollateral('variantsJSON', 'vid', 'new', { major => 'problem', vid => 'new' });
isnt($newVid, 'new', 'setCollateral assigns a new id to collateral with an id of "new"');
$newVid = $product4->setCollateral('variantsJSON', 'vid', 'new', { major => 'problem', vid => '' });
isnt($newVid, 'new', 'setCollateral assigns a new id to collateral with an id of ""');
ok($session->id->valid($newVid), '... and it is a valid GUID');
$product4->purge;