X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction%2FSerialize%2FJSON.pm;h=730ef22a5663151149d598850bb9fc45250ab4cf;hb=8d507a2fdb74a618a20c2d7bcac3f29d13703f60;hp=9e1521ed043c87830a8b161bbfed5d12ebd5d3e5;hpb=a9e5f3d2aa58a89ffd70ec22a5485fdbd4b7a3d6;p=catagits%2FCatalyst-Action-REST.git diff --git a/lib/Catalyst/Action/Serialize/JSON.pm b/lib/Catalyst/Action/Serialize/JSON.pm index 9e1521e..730ef22 100644 --- a/lib/Catalyst/Action/Serialize/JSON.pm +++ b/lib/Catalyst/Action/Serialize/JSON.pm @@ -2,11 +2,14 @@ package Catalyst::Action::Serialize::JSON; use Moose; use namespace::autoclean; +BEGIN { + $ENV{'PERL_JSON_BACKEND'} = 2; # Always use compiled JSON::XS +} extends 'Catalyst::Action'; use JSON (); -our $VERSION = '0.88'; +our $VERSION = '1.00'; $VERSION = eval $VERSION; has encoder => ( @@ -39,4 +42,6 @@ sub serialize { $self->encoder->encode( $data ); } +__PACKAGE__->meta->make_immutable; + 1;