/[Arh]/t/00-model-Unit.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 /t/00-model-Unit.t

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

revision 23 by dpavlin, Fri Nov 30 23:23:14 2007 UTC revision 39 by dpavlin, Sun Apr 6 11:12:58 2008 UTC
# Line 34  ok($campaign->create( Line 34  ok($campaign->create(
34  ok(my $o = Arh::Model::Unit->new(current_user => $system_user), 'Unit' );  ok(my $o = Arh::Model::Unit->new(current_user => $system_user), 'Unit' );
35  my ($id) = $o->create(  my ($id) = $o->create(
36          name => 'test unit',          name => 'test unit',
37          inv_id => 'TEST42',          inventory_nr => 'TEST42',
38          campaign => $campaign,          campaign => $campaign,
39  );  );
40  ok($id, "Unit create returned success");  ok($id, "Unit create returned success");
# Line 44  is($o->id, $id, "Create returned the rig Line 44  is($o->id, $id, "Create returned the rig
44  # And another  # And another
45  $o->create(  $o->create(
46          name => 'unit 2',          name => 'unit 2',
47          inv_id => 'TEST2',          inventory_nr => 'TEST2',
48          campaign => $campaign,          campaign => $campaign,
49  );  );
50  ok($o->id, "Unit create returned another value");  ok($o->id, "Unit create returned another value");

Legend:
Removed from v.23  
changed lines
  Added in v.39

  ViewVC Help
Powered by ViewVC 1.1.26