/[Frey]/trunk/t/01-frey-classloader.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/01-frey-classloader.t

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

revision 329 by dpavlin, Wed Nov 5 19:13:01 2008 UTC revision 330 by dpavlin, Fri Nov 7 20:46:10 2008 UTC
# Line 43  my $test = { Line 43  my $test = {
43    
44  foreach my $p ( keys %$test ) {  foreach my $p ( keys %$test ) {
45          ok( my ( $meta, $is_role ) = $o->class_meta( $p ), "load_package( $p )" );          ok( my ( $meta, $is_role ) = $o->class_meta( $p ), "load_package( $p )" );
46          is( $is_role, $test->{$p}, 'check role' );          is( $is_role, $test->{$p}, $is_role ? 'role' : 'not role' );
47          diag $meta->dump(2) if $debug;          diag $meta->dump(2) if $debug;
48  }  }
Legend:
Removed from v.329  
changed lines
  Added in v.330
  ViewVC Help
Powered by ViewVC 1.1.26