X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git;a=blobdiff_plain;f=t%2Flib%2FTest%2FSerialize%2FController%2FJSON.pm;fp=t%2Flib%2FTest%2FSerialize%2FController%2FJSON.pm;h=0000000000000000000000000000000000000000;hp=fcc07a371b5927be21f5f1ddadba5c6b024ffd5b;hb=79025f72c27ba313b3c701cee238f84166f32f9e;hpb=f10c7e1c7eb3b4cb10401dbb86ca8db3dc38ced2 diff --git a/t/lib/Test/Serialize/Controller/JSON.pm b/t/lib/Test/Serialize/Controller/JSON.pm deleted file mode 100644 index fcc07a3..0000000 --- a/t/lib/Test/Serialize/Controller/JSON.pm +++ /dev/null @@ -1,29 +0,0 @@ -package Test::Serialize::Controller::JSON; - -use namespace::autoclean; -use Moose; - -BEGIN { extends qw/Catalyst::Controller::REST/ }; - -__PACKAGE__->config( - 'stash_key' => 'rest', - 'json_options' => { - relaxed => 1, - }, - 'map' => { - 'text/x-json' => 'JSON', - }, -); - -sub monkey_json_put : Path("/monkey_json_put") : ActionClass('Deserialize') { - my ( $self, $c ) = @_; - if ( ref($c->req->data) eq "HASH" ) { - my $out = ($c->req->data->{'sushi'}||'') . ($c->req->data->{'chicken'}||''); - utf8::encode($out); - $c->res->output( $out ); - } else { - $c->res->output(1); - } -} - -1;