--- branches/mojo/t/02-frey-introspect.t 2008/11/01 15:36:33 235 +++ branches/mojo/t/02-frey-introspect.t 2008/11/01 16:41:45 236 @@ -25,9 +25,9 @@ my $more = 5; -foreach my $package ( $f->classes ) { +foreach my $class ( $f->classes ) { - ok( my $o = Frey::Introspect->new( debug => $debug, package => $package ), 'new' ); + ok( my $o = Frey::Introspect->new( debug => $debug, class => $class ), 'new' ); isa_ok( $o, 'Frey::Introspect' ); diag dump( $o ) if $debug;