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

Start working on the new method, with tests.

Browse source 
Refactor out the object building code into a private method to be shared by
new and create.
This commit is contained in:
Colin Kuskie 2008-02-23 00:30:18 +00:00
parent b174ce51fb
commit 669bb870eb
2 changed files with 73 additions and 12 deletions
Download patch file Download diff file Expand all files Collapse all files

19
t/Shop/ShipDriver.t
View file

@ -29,7 +29,7 @@ my $session = WebGUI::Test->session;
#----------------------------------------------------------------------------
# Tests
my $tests = 15;
my $tests = 18;
plan tests => 1 + $tests;
#----------------------------------------------------------------------------
@ -167,6 +167,23 @@ is($count, 0, 'delete deleted the object');
undef $driver;
#######################################################################
#
# new
#
#######################################################################
my $oldDriver;
eval { $oldDriver = WebGUI::Shop::ShipDriver->new(); };
like ($@, qr/^new requires a session object/, 'new croaks without a session object');
eval { $oldDriver = WebGUI::Shop::ShipDriver->new($session); };
like ($@, qr/^new requires a shipperId/, 'new croaks without a shipperId');
eval { $oldDriver = WebGUI::Shop::ShipDriver->new($session, 'notEverAnId'); };
like ($@, qr/^The requested shipperId does not exist in the db/, 'new croaks unless the requested shipperId object exists in the db');
#######################################################################
#
# calculate