--- t/00-model-Code.t 2007/06/05 13:13:02 11 +++ t/00-model-Code.t 2007/06/05 14:21:22 12 @@ -19,13 +19,13 @@ # Try testing a create my $o = Perly::Model::Code->new(current_user => $system_user); -my ($id) = $o->create( source => 'foo' ); +my ($id) = $o->create( source => 'foo', name => 'a' ); ok($id, "Code create returned success"); ok($o->id, "New Code has valid id set"); is($o->id, $id, "Create returned the right id"); # And another -$o->create( source => 'bar' ); +$o->create( source => 'bar', name => 'b' ); ok($o->id, "Code create returned another value"); isnt($o->id, $id, "And it is different from the previous one");