X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FStorage%2FFormat%2FJSON.pm;h=9726bf7c939e564fd6133e2463fc51caa6132b33;hb=b5384d082ce9b7c4fc23c74c4dfc4479ddbe7a67;hp=f39c2934f9c2c2dc963eb24be05c011e4225103c;hpb=681ad95e896af645f0c6f90bcf2c62805b8994c2;p=gitmo%2FMooseX-Storage.git diff --git a/lib/MooseX/Storage/Format/JSON.pm b/lib/MooseX/Storage/Format/JSON.pm index f39c293..9726bf7 100644 --- a/lib/MooseX/Storage/Format/JSON.pm +++ b/lib/MooseX/Storage/Format/JSON.pm @@ -2,19 +2,19 @@ package MooseX::Storage::Format::JSON; use Moose::Role; -use JSON::Syck (); +use JSON::Any; requires 'pack'; requires 'unpack'; sub thaw { my ( $class, $json ) = @_; - $class->unpack( JSON::Syck::Load($json) ); + $class->unpack( JSON::Any->jsonToObj($json) ); } sub freeze { my $self = shift; - JSON::Syck::Dump( $self->pack() ); + JSON::Any->objToJson( $self->pack() ); } 1;