X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git;a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FView.pm;fp=lib%2FCatalyst%2FAction%2FSerialize%2FView.pm;h=0000000000000000000000000000000000000000;hp=1de3f480c9bef421e348d709a2eba7050d4eecb5;hb=79025f72c27ba313b3c701cee238f84166f32f9e;hpb=f10c7e1c7eb3b4cb10401dbb86ca8db3dc38ced2 diff --git a/lib/Catalyst/Action/Serialize/View.pm b/lib/Catalyst/Action/Serialize/View.pm deleted file mode 100644 index 1de3f48..0000000 --- a/lib/Catalyst/Action/Serialize/View.pm +++ /dev/null @@ -1,42 +0,0 @@ -package Catalyst::Action::Serialize::View; -use Moose; -use namespace::autoclean; - -extends 'Catalyst::Action'; - -our $VERSION = '1.07'; -$VERSION = eval $VERSION; - -sub execute { - my $self = shift; - my ( $controller, $c, $view ) = @_; - - # Views don't care / are not going to render an entity for 3XX - # responses. - return 1 if $c->response->status =~ /^(?:204|3\d\d)$/; - - my $stash_key = ( - $controller->{'serialize'} ? - $controller->{'serialize'}->{'stash_key'} : - $controller->{'stash_key'} - ) || 'rest'; - - if ( !$c->view($view) ) { - $c->log->error("Could not load $view, refusing to serialize"); - return; - } - - if ($c->view($view)->process($c, $stash_key)) { - return 1; - } else { - # This is stupid. Please improve it. - my $error = join("\n", @{ $c->error }) || "Error in $view"; - $error .= "\n"; - $c->clear_errors; - die $error; - } -} - -__PACKAGE__->meta->make_immutable; - -1;