X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FWeb%2FSimple%2FApplication.pm;h=cbbd82578c1b6642d72e23f5fe193c75737fadc6;hb=b91b7bc9c4850f0d7d89cfd97e40d743e90cf40b;hp=1ec59aafc59dc929abe66925cbff5460edf41fc2;hpb=306667ea13cd759b13dfb192ad1655a5bbe7979c;p=catagits%2FWeb-Simple.git diff --git a/lib/Web/Simple/Application.pm b/lib/Web/Simple/Application.pm index 1ec59aa..cbbd825 100644 --- a/lib/Web/Simple/Application.pm +++ b/lib/Web/Simple/Application.pm @@ -20,6 +20,10 @@ has 'config' => ( sub default_config { () } +has param_encoding => (is => "lazy"); + +sub _build_param_encoding { "UTF-8" } + has '_dispatcher' => (is => 'lazy'); sub _build__dispatcher { @@ -40,7 +44,10 @@ sub _build__dispatcher { my $node_args = { app_object => $self }; weaken($node_args->{app_object}); Web::Dispatch->new( - app => sub { $self->dispatch_request(@_), $final }, + app => sub { + { "Web::Dispatch::ParamParser.param_encoding" => $self->param_encoding }, + $self->dispatch_request(@_), $final; + }, node_class => 'Web::Simple::DispatchNode', node_args => $node_args );