X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FJSON%2FXS.pm;h=5e553e8dd65a1bfeae4e789d43f67bcc14e6c724;hb=b0e9e16904a64b7ff670fd70d52c0f66e565bbfd;hp=b1f4850db86df8257c52fa66452ad0dd28e69330;hpb=485b516094b4ebb5254bf389760c5aba594343a7;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/Serialize/JSON/XS.pm b/lib/Catalyst/Action/Serialize/JSON/XS.pm index b1f4850..5e553e8 100644 --- a/lib/Catalyst/Action/Serialize/JSON/XS.pm +++ b/lib/Catalyst/Action/Serialize/JSON/XS.pm @@ -1,14 +1,17 @@ package Catalyst::Action::Serialize::JSON::XS; -use strict; -use warnings; +use Moose; +use namespace::autoclean; +BEGIN { + $ENV{'PERL_JSON_BACKEND'} = 2; # Always use compiled JSON::XS +} -use base 'Catalyst::Action::Serialize::JSON'; -use JSON::XS qw(encode_json); +extends 'Catalyst::Action::Serialize::JSON'; +use JSON::XS (); -sub serialize { - my $self = shift; - encode_json( shift ); -} +our $VERSION = '1.09'; +$VERSION = eval $VERSION; + +__PACKAGE__->meta->make_immutable; 1;