X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Flib%2FTest%2FCatalyst%2FAction%2FREST%2FController%2FDeserializeMultiPart.pm;fp=t%2Flib%2FTest%2FCatalyst%2FAction%2FREST%2FController%2FDeserializeMultiPart.pm;h=66c5101b8e3118f37dca9e4a8a5f334b4c6e4c3d;hb=8bf1f20e52df6d2650bb9c5f68cca300b04a5b64;hp=0000000000000000000000000000000000000000;hpb=1bb5ad326c3b8baebd0d69cb8b889eea60b1a24e;p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git diff --git a/t/lib/Test/Catalyst/Action/REST/Controller/DeserializeMultiPart.pm b/t/lib/Test/Catalyst/Action/REST/Controller/DeserializeMultiPart.pm new file mode 100644 index 0000000..66c5101 --- /dev/null +++ b/t/lib/Test/Catalyst/Action/REST/Controller/DeserializeMultiPart.pm @@ -0,0 +1,22 @@ +package Test::Catalyst::Action::REST::Controller::DeserializeMultiPart; +use Moose; +use namespace::autoclean; + +BEGIN { extends 'Catalyst::Controller' } + +__PACKAGE__->config( + 'stash_key' => 'rest', + 'map' => { + 'text/x-yaml' => 'YAML', + 'text/x-data-dumper' => [ 'Data::Serializer', 'Data::Dumper' ], + 'text/broken' => 'Broken', + }, +); + +sub test :Local ActionClass('DeserializeMultiPart') DeserializePart('REST') { + my ( $self, $c ) = @_; + $DB::single=1; + $c->res->output($c->req->data->{'kitty'} . '|' . $c->req->uploads->{other}->size); +} + +1;