X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FJSON.pm;h=d4b12dfa3db4737d74e327cf03b2f97856b49db9;hb=930013e6f19b25a090c3f8839495ad8d9b15ff6d;hp=a681bcf25f9567f3fd8346b1e91b1a6f7c0add3f;hpb=546f2871596e4ee5b305891b254170f45eb49629;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/Serialize/JSON.pm b/lib/Catalyst/Action/Serialize/JSON.pm index a681bcf..d4b12df 100644 --- a/lib/Catalyst/Action/Serialize/JSON.pm +++ b/lib/Catalyst/Action/Serialize/JSON.pm @@ -1,16 +1,9 @@ -# -# Catlyst::Action::Serialize::JSON.pm -# Created by: Adam Jacob, Marchex, -# Created on: 10/12/2006 03:00:32 PM PDT -# -# $Id$ - package Catalyst::Action::Serialize::JSON; -use strict; -use warnings; +use Moose; +use namespace::autoclean; -use base 'Catalyst::Action'; +extends 'Catalyst::Action'; use JSON qw(encode_json); sub execute { @@ -24,7 +17,7 @@ sub execute { ) || 'rest'; my $output; eval { - $output = $self->encode( $c->stash->{$stash_key} ); + $output = $self->serialize( $c->stash->{$stash_key} ); }; if ($@) { return $@; @@ -33,9 +26,9 @@ sub execute { return 1; } -sub encode { +sub serialize { my $self = shift; - encode_json( @_ ); + encode_json( shift ); } 1;