--- trunk/lib/Frey/Run.pm 2008/11/30 23:49:32 653 +++ trunk/lib/Frey/Run.pm 2008/12/14 14:13:35 835 @@ -1,6 +1,6 @@ package Frey::Run; use Moose; -#extends 'Frey::ClassLoader'; +#extends 'Frey::Class::Loader'; extends 'Frey::Action'; with 'Frey::Session'; @@ -137,7 +137,8 @@ $o->title( $class ); $html = $o->page( body => $body ) if $body && !$html; - + $self->content_type( $o->content_type ); + confess "no html output for $class ", $o->dump unless defined $html; }; @@ -150,10 +151,10 @@ my $o = Frey->new; $o->{request_url} = $self->request_url; # sigh, this is dynamic languge, right? Frey::Web->meta->apply( $o ); - $html = $o->page( body => $self->error( $error ) ); + $html = $o->page( body => $self->error( $error, undef ) ); } - warn $self->class, " produced ", length($html), " bytes"; + warn $self->class, " produced ", length($html), " bytes of ", $self->content_type; return $html; }