X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FYAML.pm;h=b57d5322c43af2427c03842a3a47c12355c09bec;hb=d0822465cc09629df95ad9c522bce758f2badc8c;hp=911191b2629323f61ffd12dcfccba49eb09818e2;hpb=930013e6f19b25a090c3f8839495ad8d9b15ff6d;p=catagits%2FCatalyst-Action-Serialize-Data-Serializer.git diff --git a/lib/Catalyst/Action/Serialize/YAML.pm b/lib/Catalyst/Action/Serialize/YAML.pm index 911191b..b57d532 100644 --- a/lib/Catalyst/Action/Serialize/YAML.pm +++ b/lib/Catalyst/Action/Serialize/YAML.pm @@ -6,6 +6,9 @@ use namespace::autoclean; extends 'Catalyst::Action'; use YAML::Syck; +our $VERSION = '1.02'; +$VERSION = eval $VERSION; + sub execute { my $self = shift; my ( $controller, $c ) = @_; @@ -15,13 +18,7 @@ sub execute { $controller->{'serialize'}->{'stash_key'} : $controller->{'stash_key'} ) || 'rest'; - my $output; - eval { - $output = $self->serialize($c->stash->{$stash_key}); - }; - if ($@) { - return $@; - } + my $output = $self->serialize($c->stash->{$stash_key}); $c->response->output( $output ); return 1; } @@ -32,4 +29,6 @@ sub serialize { Dump($data); } +__PACKAGE__->meta->make_immutable; + 1;