--- trunk/lib/Frey/Test/Runner.pm 2008/11/24 22:56:41 506 +++ trunk/lib/Frey/Test/Runner.pm 2008/11/25 00:26:15 507 @@ -77,11 +77,13 @@ @tests = ( $self->test ) if $self->test; - @tests = grep { - ! m{$0} # break recursion - } sort keys %{ $self->depends } unless @tests; + if ( my $depends = $self->depends ) { + @tests = grep { + ! m{$0} # break recursion + } sort keys %{ $depends } unless @tests; + } - push @{ $self->status }, { test => { depends => $self->depends } }; # FIXME + $self->add_status( { test => { depends => $self->depends } } ); if ( ! @tests ) { warn "can't find any tests ", dump( $self->tests ), " within depends ", dump( $self->depends );