/[A3C]/t/30-aaieduhr.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/30-aaieduhr.t

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

revision 88 by dpavlin, Tue Apr 29 19:54:52 2008 UTC revision 89 by dpavlin, Tue Apr 29 21:43:36 2008 UTC
# Line 8  test AAIEduHr integration Line 8  test AAIEduHr integration
8    
9  =cut  =cut
10    
11  use Jifty::Test tests => 2;  use Jifty::Test tests => 8;
12    
13  use Data::Dump qw/dump/;  use Data::Dump qw/dump/;
14    
15  use_ok('A3C::AAIEduHr');  use_ok('A3C::AAIEduHr');
16    
17  ok( my $a = A3C::AAIEduHr->available('hrEdu002'), 'available' );  foreach my $nr ( 1 .. 7 ) {
18  diag "got = ",dump( $a );          my $name = sprintf('hrEdu%03d', $nr);
19            ok( my $a = A3C::AAIEduHr->vocabulary( $name ), "vucabulatory $name" );
20            diag "$name = ",dump( $a );
21    }

Legend:
Removed from v.88  
changed lines
  Added in v.89

  ViewVC Help
Powered by ViewVC 1.1.26