From: Stevan Little Date: Mon, 30 Apr 2007 14:13:44 +0000 (+0000) Subject: more tweaks for 0.01 X-Git-Tag: 0_02~15 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=7b428d1fd844e32dc3500a1fefc6cd794dc45fc8;p=gitmo%2FMooseX-Storage.git more tweaks for 0.01 --- diff --git a/Changes b/Changes index 02529ed..9e39cc1 100644 --- a/Changes +++ b/Changes @@ -1,5 +1,6 @@ Revision history for MooseX-Storage -0.01 - Initial release. +0.01 Mon. April 30, 2007 + This was Chris's idea originally (blame him), and + we expanded on it to create what you see here :) diff --git a/lib/MooseX/Storage.pm b/lib/MooseX/Storage.pm index ccf48f4..9585e5f 100644 --- a/lib/MooseX/Storage.pm +++ b/lib/MooseX/Storage.pm @@ -4,6 +4,8 @@ use Moose qw(confess); use MooseX::Storage::Meta::Attribute::DoNotSerialize; +our $VERSION = '0.01'; + sub import { my $pkg = caller(); @@ -103,6 +105,14 @@ MooseX::Storage is a serialization framework for Moose, it provides a very flexible and highly pluggable way to serialize Moose classes to a number of different formats and styles. +=head2 Important Note + +This is still an early release of this module, so use with caution. +It's outward facing serialization API should be considered stable, +but I still reserve the right to make tweaks if I need too. Anything +beyond the basic pack/unpack, freeze/thaw and load/store should not +be relied on. + =head2 Levels of Serialization There are 3 levels to the serialization, each of which builds upon @@ -216,8 +226,8 @@ hand if you like. =head1 TODO -This module needs docs and probably a couple a Cookbook of some kind -as well. This is an early release, so that is my excuse for now :) +This module needs docs and probably a Cookbook of some kind as well. +This is an early release, so that is my excuse for now :) For the time being, please read the tests and feel free to email me if you have any questions. This module can also be discussed on IRC diff --git a/lib/MooseX/Storage/Basic.pm b/lib/MooseX/Storage/Basic.pm index 38622ff..a6bf51e 100644 --- a/lib/MooseX/Storage/Basic.pm +++ b/lib/MooseX/Storage/Basic.pm @@ -4,6 +4,8 @@ use Moose::Role; use MooseX::Storage::Engine; +our $VERSION = '0.01'; + sub pack { my $self = shift; my $e = MooseX::Storage::Engine->new( object => $self ); diff --git a/lib/MooseX/Storage/Engine/IO/AtomicFile.pm b/lib/MooseX/Storage/Engine/IO/AtomicFile.pm index 41535e7..f2e1058 100644 --- a/lib/MooseX/Storage/Engine/IO/AtomicFile.pm +++ b/lib/MooseX/Storage/Engine/IO/AtomicFile.pm @@ -4,6 +4,8 @@ use Moose; use IO::AtomicFile; +our $VERSION = '0.01'; + extends 'MooseX::Storage::Engine::IO::File'; sub store { diff --git a/lib/MooseX/Storage/Engine/IO/File.pm b/lib/MooseX/Storage/Engine/IO/File.pm index ee27c3f..b5ba99d 100644 --- a/lib/MooseX/Storage/Engine/IO/File.pm +++ b/lib/MooseX/Storage/Engine/IO/File.pm @@ -4,6 +4,8 @@ use Moose; use IO::File; +our $VERSION = '0.01'; + has 'file' => ( is => 'ro', isa => 'Str', diff --git a/lib/MooseX/Storage/Format/JSON.pm b/lib/MooseX/Storage/Format/JSON.pm index 713dfa7..938b5c7 100644 --- a/lib/MooseX/Storage/Format/JSON.pm +++ b/lib/MooseX/Storage/Format/JSON.pm @@ -4,6 +4,8 @@ use Moose::Role; use JSON::Any; +our $VERSION = '0.01'; + requires 'pack'; requires 'unpack'; diff --git a/lib/MooseX/Storage/Format/YAML.pm b/lib/MooseX/Storage/Format/YAML.pm index df4d0a1..dad4120 100644 --- a/lib/MooseX/Storage/Format/YAML.pm +++ b/lib/MooseX/Storage/Format/YAML.pm @@ -7,6 +7,8 @@ use Best [ [ qw[Load Dump] ] ]; +our $VERSION = '0.01'; + requires 'pack'; requires 'unpack'; diff --git a/lib/MooseX/Storage/IO/AtomicFile.pm b/lib/MooseX/Storage/IO/AtomicFile.pm index ebc84f0..50977ce 100644 --- a/lib/MooseX/Storage/IO/AtomicFile.pm +++ b/lib/MooseX/Storage/IO/AtomicFile.pm @@ -4,6 +4,8 @@ use Moose::Role; use MooseX::Storage::Engine::IO::AtomicFile; +our $VERSION = '0.01'; + with 'MooseX::Storage::IO::File'; sub store { diff --git a/lib/MooseX/Storage/IO/File.pm b/lib/MooseX/Storage/IO/File.pm index 981946d..cbff2d0 100644 --- a/lib/MooseX/Storage/IO/File.pm +++ b/lib/MooseX/Storage/IO/File.pm @@ -4,6 +4,8 @@ use Moose::Role; use MooseX::Storage::Engine::IO::File; +our $VERSION = '0.01'; + requires 'thaw'; requires 'freeze'; diff --git a/lib/MooseX/Storage/Meta/Attribute/DoNotSerialize.pm b/lib/MooseX/Storage/Meta/Attribute/DoNotSerialize.pm index 29e0e57..b309eb7 100644 --- a/lib/MooseX/Storage/Meta/Attribute/DoNotSerialize.pm +++ b/lib/MooseX/Storage/Meta/Attribute/DoNotSerialize.pm @@ -2,10 +2,15 @@ package MooseX::Storage::Meta::Attribute::DoNotSerialize; use Moose; +our $VERSION = '0.01'; + extends 'Moose::Meta::Attribute'; # register this alias ... package Moose::Meta::Attribute::Custom::DoNotSerialize; + +our $VERSION = '0.01'; + sub register_implementation { 'MooseX::Storage::Meta::Attribute::DoNotSerialize' } 1;