/[transports]/trunk/t/00-model-Destination.t
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/t/00-model-Destination.t

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 50 by dpavlin, Fri May 26 21:21:25 2006 UTC revision 51 by dpavlin, Mon Jun 5 14:06:58 2006 UTC
# Line 21  ok($system_user, "Found a system user"); Line 21  ok($system_user, "Found a system user");
21    
22  # Try testing a create  # Try testing a create
23  my $o = Transports::Model::Destination->new(current_user => $system_user);  my $o = Transports::Model::Destination->new(current_user => $system_user);
24  my ($id) = $o->create( name => 'dest1' );  my ($id) = $o->create(
25            name => 'dest1',
26            landscape => 1,
27    );
28  ok($id, "Destination create returned success");  ok($id, "Destination create returned success");
29  ok($o->id, "New Destination has valid id set");  ok($o->id, "New Destination has valid id set");
30  is($o->id, $id, "Create returned the right id");  is($o->id, $id, "Create returned the right id");
31    
32  # And another  # And another
33  $o->create( name => 'dest2' );  $o->create(
34            name => 'dest2',
35            landscape => 2,
36    );
37  ok($o->id, "Destination create returned another value");  ok($o->id, "Destination create returned another value");
38  isnt($o->id, $id, "And it is different from the previous one");  isnt($o->id, $id, "And it is different from the previous one");
39    

Legend:
Removed from v.50  
changed lines
  Added in v.51

  ViewVC Help
Powered by ViewVC 1.1.26