--- trunk/lib/Frey/Run.pm 2008/11/28 16:44:16 592 +++ trunk/lib/Frey/Run.pm 2008/11/28 19:19:25 601 @@ -106,10 +106,9 @@ $body .= ''; } } elsif ( $self->run =~ m{as_data} ) { - $data = $o->{$self->run}(); - warn "no data from ", $self->run; - $data ||= $o->as_data(); - confess "no data for $class->" . $self->run . " from " . $self->html_dump( $data ) unless $data; + my $run = $self->run; + $data = $o->$run; + confess "no data for $class->$run" unless defined $data; $self->add_status( { $self->run => $data } ); } else { $body = $self->error( "IGNORE: $class ", $o->dump ); @@ -124,7 +123,7 @@ $body .= Frey::View::Dumper->new( data => $data )->as_markup if defined $data; } - $self->title( $class ); + $o->title( $class ); $html = $o->page( body => $body ) if $body && !$html; @@ -136,9 +135,10 @@ $self->status_parts; if ( $@ ) { + my $error = $@; my $o = Frey->new; Frey::Web->meta->apply( $o ); - $html = $o->page( body => $self->error( $@ ) ); + $html = $o->page( body => $self->error( $error ) ); } warn $self->class, " produced ", length($html), " bytes";