--- Webpacus/lib/Webpacus.pm 2005/11/22 12:57:35 97 +++ Webpacus/lib/Webpacus.pm 2005/11/30 23:21:30 200 @@ -12,20 +12,18 @@ use Catalyst qw/-Debug Static::Simple Prototype - Unicode::Encoding Config::YAML + FillInForm /; # FormValidator -# FillInForm -our $VERSION = '0.01'; +our $VERSION = '0.11-dev'; # # Configure the application # __PACKAGE__->config( name => 'Webpacus', - encoding => 'ISO-8859-2', config_file => 'config.yml', ); @@ -66,12 +64,15 @@ sub end : Private { my ( $self, $c ) = @_; + $c->stash->{webpacus_version} = $VERSION; + # Forward to View unless response body is already defined $c->forward('View::TT') unless $c->response->body; - $c->log->debug( $c->response->body ); + $c->fillform; # defaults to $c->req->parameters + +# $c->log->debug( $c->response->body ); -# $c->fillform; # defaults to $c->req->parameters } =back