X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FJSON%2FXS.pm;h=7fb0702830822a71f2e936691593460f73cecf39;hb=7566d72f425ab3a870f1d6c8945c43f4edeedf2a;hp=4e7ab1ca6bc30c90794f1ffbb7e7b6e92d72468d;hpb=f465980c3c25b475d878716b7341d0a4f5c8f823;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 4e7ab1c..7fb0702 100644 --- a/lib/Catalyst/Action/Serialize/JSON/XS.pm +++ b/lib/Catalyst/Action/Serialize/JSON/XS.pm @@ -2,16 +2,16 @@ package Catalyst::Action::Serialize::JSON::XS; use Moose; use namespace::autoclean; +BEGIN { + $ENV{'PERL_JSON_BACKEND'} = 2; # Always use compiled JSON::XS +} extends 'Catalyst::Action::Serialize::JSON'; -use JSON::XS qw(encode_json); +use JSON::XS (); -our $VERSION = '0.81'; +our $VERSION = '1.13'; $VERSION = eval $VERSION; -sub serialize { - my $self = shift; - encode_json( shift ); -} +__PACKAGE__->meta->make_immutable; 1;