Commit | Line | Data |
546f2871 |
1 | package Catalyst::Action::Serialize::JSON::XS; |
2 | |
3 | use strict; |
4 | use warnings; |
5 | |
6 | use base 'Catalyst::Action::Serialize::JSON'; |
7 | use JSON::XS qw(encode_json); |
8 | |
9 | sub encode { |
10 | my $self = shift; |
11 | encode_json( @_ ); |
12 | } |
13 | |
14 | 1; |