package Catalyst::Action::Serialize::JSON::XS;
-use strict;
-use warnings;
+use Moose;
+use namespace::autoclean;
-use base 'Catalyst::Action::Serialize::JSON';
-use JSON::XS qw(encode_json);
+extends 'Catalyst::Action::Serialize::JSON';
+use JSON::XS ();
-sub encode {
- my $self = shift;
- encode_json( @_ );
+our $VERSION = '0.87';
+$VERSION = eval $VERSION;
+
+sub _build_encoder {
+ my $self = shift;
+ return JSON::XS->new->convert_blessed;
}
1;