--- trunk/t/00-model-Transport.t 2006/05/05 12:25:30 6 +++ trunk/t/00-model-Transport.t 2006/05/05 12:36:45 7 @@ -8,7 +8,7 @@ =cut -use Jifty::Test tests => 11; +use Jifty::Test tests => 13; # Make sure we can load the model use_ok('Transports::Model::Transport'); @@ -17,15 +17,31 @@ my $system_user = Transports::CurrentUser->superuser; ok($system_user, "Found a system user"); +my $s = Transports::Model::Source->new(current_user => $system_user); +ok(my $s_id = $s->create( name => 'test source' ), 'test source'); + +my $d = Transports::Model::Destination->new(current_user => $system_user); +ok(my $d_id = $s->create( name => 'test destination' ), 'test destination'); + # Try testing a create my $o = Transports::Model::Transport->new(current_user => $system_user); -my ($id) = $o->create(); +my ($id) = $o->create( + source => $s_id, + destination => $d_id, + request_nr => 12345, + client_dependent => 0, +); ok($id, "Transport create returned success"); ok($o->id, "New Transport has valid id set"); is($o->id, $id, "Create returned the right id"); # And another -$o->create(); +$o->create( + source => $s_id, + destination => $d_id, + request_nr => 54321, + client_dependent => 1, +); ok($o->id, "Transport create returned another value"); isnt($o->id, $id, "And it is different from the previous one");