/[A3C]/t/00-model-StrixInstance.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-StrixInstance.t

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

revision 174 by dpavlin, Mon Jun 16 16:48:16 2008 UTC revision 191 by dpavlin, Tue Jun 17 14:28:10 2008 UTC
# Line 8  A basic test harness for the StrixInstan Line 8  A basic test harness for the StrixInstan
8    
9  =cut  =cut
10    
11  use Jifty::Test tests => 11;  use Jifty::Test tests => 14;
12    
13  # Make sure we can load the model  # Make sure we can load the model
14  use_ok('A3C::Model::StrixInstance');  use_ok('A3C::Model::StrixInstance');
# Line 47  is($collection->count, 0, "Deleted row i Line 47  is($collection->count, 0, "Deleted row i
47  $collection->unlimit;  $collection->unlimit;
48  is($collection->count, 1, "Still one left");  is($collection->count, 1, "Still one left");
49    
50    my $site = A3C::Model::StrixSite->new(current_user => $system_user);
51    ok($site->create(
52            'instance' => 'bar',
53            'naziv' => "Naziv 42",
54            'admin_mail' => "Admin mail",
55            'id' => 42,
56    ), 'site');
57    ok($site->create(
58            'instance' => 'bar',
59            'naziv' => "Naziv 43",
60            'admin_mail' => "Admin mail",
61            'id' => 43,
62    ), 'site');
63    
64    is( $o->has_sites->count, 2 ,'has_sites' );
Legend:
Removed from v.174  
changed lines
  Added in v.191
  ViewVC Help
Powered by ViewVC 1.1.26