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

Fix a test with random false fails.

Browse source
This commit is contained in:
Colin Kuskie 2010-08-10 21:24:21 -07:00
parent 38788f156c
commit d06b7b547d
1 changed files with 3 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

7
t/Shop/Vendor.t
View file

@ -122,7 +122,7 @@ cmp_deeply(
'create: requires a session variable',
);
my $now = WebGUI::DateTime->new($session, time);
my $now = time();
eval { $fence = WebGUI::Shop::Vendor->create($session, { userId => $fenceUser->userId, }); };
WebGUI::Test->addToCleanup($fence);
@ -131,9 +131,8 @@ ok(!$e, 'No exception thrown by create');
isa_ok($vendor, 'WebGUI::Shop::Vendor', 'create returns correct type of object');
ok($fence->get('dateCreated'), 'dateCreated is not null');
my $dateCreated = WebGUI::DateTime->new($session, $fence->get('dateCreated'));
my $deltaDC = $dateCreated - $now;
cmp_ok( $deltaDC->seconds, '<=', 2, 'dateCreated is set properly');
my $deltaDC = $fence->get('dateCreated') - $now;
cmp_ok( $deltaDC, '<=', 2, 'dateCreated is set properly');
#######################################################################
#