From 6acef1a1d19aa37a92406934db40883e1796bea5 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Wed, 8 Dec 2010 17:30:19 +0100 Subject: pass the format optiosn to the serializers --- lib/Net/HTTP/API/Parser/JSON.pm | 11 ++--------- 1 file changed, 2 insertions(+), 9 deletions(-) (limited to 'lib/Net/HTTP/API/Parser/JSON.pm') diff --git a/lib/Net/HTTP/API/Parser/JSON.pm b/lib/Net/HTTP/API/Parser/JSON.pm index 2edc71c..d340c75 100644 --- a/lib/Net/HTTP/API/Parser/JSON.pm +++ b/lib/Net/HTTP/API/Parser/JSON.pm @@ -6,21 +6,14 @@ use JSON; use Moose; extends 'Net::HTTP::API::Parser'; -has _json_parser => ( - is => 'rw', - isa => 'JSON', - lazy => 1, - default => sub { JSON->new->allow_nonref }, -); - sub encode { my ($self, $content) = @_; - $self->_json_parser->encode($content); + JSON::to_json($content, $self->format_options); } sub decode { my ($self, $content) = @_; - $self->_json_parser->decode($content); + JSON::from_json($content, $self->format_options); } 1; -- cgit v1.2.3