) || 'rest';
my $output;
eval {
- $output = $self->encode( $c->stash->{$stash_key} );
+ $output = $self->serialize( $c->stash->{$stash_key} );
};
if ($@) {
return $@;
return 1;
}
-sub encode {
+sub serialize {
my $self = shift;
encode_json( shift );
}
use base 'Catalyst::Action::Serialize::JSON';
use JSON::XS qw(encode_json);
-sub encode {
+sub serialize {
my $self = shift;
encode_json( shift );
}
) || 'rest';
my $output;
eval {
- $output = Dump($c->stash->{$stash_key});
+ $output = $self->serialize($c->stash->{$stash_key});
};
if ($@) {
return $@;
return 1;
}
+sub serialize {
+ my $self = shift;
+ my $data = shift;
+ Dump($data);
+}
+
1;