extends 'Catalyst::Action';
use JSON::MaybeXS qw(JSON);
-# VERSION
-
has encoder => (
is => 'ro',
lazy_build => 1,
my $self = shift;
my ( $controller, $c ) = @_;
+ if (my $options = $controller->{json_options_encode}) {
+ foreach my $opt (keys %$options) {
+ $self->encoder->$opt( $options->{$opt} );
+ }
+ }
+
my $stash_key = (
$controller->{'serialize'} ?
$controller->{'serialize'}->{'stash_key'} :