X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FData%2FSerializer.pm;h=edfc0f34948673f0b43c32e13b7051992a9d6547;hb=40de934ce925aa9fbf1d2fa15846b5c0de9ec790;hp=71690f37cdf8d68336fcc0119aa38736be543c96;hpb=be3c588afb1dd6d6c8e6171c01c3d38afa75d6d5;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/Serialize/Data/Serializer.pm b/lib/Catalyst/Action/Serialize/Data/Serializer.pm index 71690f3..edfc0f3 100644 --- a/lib/Catalyst/Action/Serialize/Data/Serializer.pm +++ b/lib/Catalyst/Action/Serialize/Data/Serializer.pm @@ -1,25 +1,22 @@ -# -# Catalyst::Action::Serialize::Data::Serializer -# Created by: Adam Jacob, Marchex, -# -# $Id$ - package Catalyst::Action::Serialize::Data::Serializer; -use strict; -use warnings; +use Moose; +use namespace::autoclean; -use base 'Catalyst::Action'; +extends 'Catalyst::Action'; use Data::Serializer; +our $VERSION = '1.01'; +$VERSION = eval $VERSION; + sub execute { my $self = shift; my ( $controller, $c, $serializer ) = @_; my $stash_key = ( - $controller->config->{'serialize'} ? - $controller->config->{'serialize'}->{'stash_key'} : - $controller->config->{'stash_key'} + $controller->{'serialize'} ? + $controller->{'serialize'}->{'stash_key'} : + $controller->{'stash_key'} ) || 'rest'; my $sp = $serializer; $sp =~ s/::/\//g; @@ -29,18 +26,14 @@ sub execute { }; if ($@) { $c->log->info("Could not load $serializer, refusing to serialize: $@"); - return 0; + return; } my $dso = Data::Serializer->new( serializer => $serializer ); - my $data; - eval { - $data = $dso->raw_serialize($c->stash->{$stash_key}); - }; - if ($@) { - return $@; - } + my $data = $dso->raw_serialize($c->stash->{$stash_key}); $c->response->output( $data ); return 1; } +__PACKAGE__->meta->make_immutable; + 1;