--- trunk/lib/Frey/Run.pm 2008/11/06 18:03:06 324 +++ trunk/lib/Frey/Run.pm 2008/11/08 23:03:35 336 @@ -1,10 +1,14 @@ package Frey::Run; use Moose; -extends 'Frey::ClassLoader'; +#extends 'Frey::ClassLoader'; +extends 'Frey::PPI'; with 'Frey::Web'; with 'Frey::Config'; with 'Frey::Escape'; +use Data::Dump qw/dump/; +use Frey::Dumper; + =head1 NAME Frey::Run - display required form field for Class and run it @@ -30,8 +34,6 @@ default => sub { {} }, ); -use Data::Dump qw/dump/; - sub html { my ( $self ) = @_; @@ -56,9 +58,15 @@ warn "# $class config = ",dump( $values ); if ( @required ) { - $html = qq|