X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FStorage%2FDeferred.pm;h=09be00cbba2f1fe5e66b8a8e766e8ba889ca3faf;hb=004bf3ea04d7818116a94bb4b387d8ae1dd10f9a;hp=1e34f16b4d9af2d48d7abc5f2ceb9b627fa6f441;hpb=61fb1aaaf5a1cc17e1ae52779e36373aa0bbd70a;p=gitmo%2FMooseX-Storage.git

diff --git a/lib/MooseX/Storage/Deferred.pm b/lib/MooseX/Storage/Deferred.pm
index 1e34f16..09be00c 100644
--- a/lib/MooseX/Storage/Deferred.pm
+++ b/lib/MooseX/Storage/Deferred.pm
@@ -1,7 +1,7 @@
 package MooseX::Storage::Deferred;
 use Moose::Role;
 
-our $VERSION   = '0.26';
+our $VERSION   = '0.28';
 our $AUTHORITY = 'cpan:STEVAN';
 
 with 'MooseX::Storage::Basic';
@@ -93,6 +93,9 @@ MooseX::Storage::Deferred - A role for undecisive programmers
   # pack the class into a JSON string
   $p->freeze({ format => 'JSON' }); # { "__CLASS__" : "Point", "x" : 10, "y" : 10 }
 
+  # pack the class into a JSON string using parameterized JSONpm role
+  $p->freeze({ format => [ JSONpm => { json_opts => { pretty => 1 } } ] });
+
   # unpack the JSON string into a class
   my $p2 = Point->thaw(
       '{ "__CLASS__" : "Point", "x" : 10, "y" : 10 }',
@@ -114,6 +117,8 @@ SYNOPSIS for more info)
 
 =item I<JSON>
 
+=item I<JSONpm>
+
 =item I<YAML>
 
 =item I<Storable>