X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FStorage%2FIO%2FAtomicFile.pm;h=efd41dcdaee1136b98cd850fe0b88892f55c1aa9;hb=e44b5f5498b782752d2c91b6796698c86143a2f0;hp=8d29e1830ee7b0e2858be73704284f161f7d9afa;hpb=e64b730236154a4f45ace9db2bbf915bd91956f1;p=gitmo%2FMooseX-Storage.git diff --git a/lib/MooseX/Storage/IO/AtomicFile.pm b/lib/MooseX/Storage/IO/AtomicFile.pm index 8d29e18..efd41dc 100644 --- a/lib/MooseX/Storage/IO/AtomicFile.pm +++ b/lib/MooseX/Storage/IO/AtomicFile.pm @@ -1,16 +1,20 @@ - package MooseX::Storage::IO::AtomicFile; use Moose::Role; use MooseX::Storage::Engine::IO::AtomicFile; +our $VERSION = '0.32'; +our $AUTHORITY = 'cpan:STEVAN'; + with 'MooseX::Storage::IO::File'; sub store { - my ( $self, $filename ) = @_; - MooseX::Storage::Engine::IO::AtomicFile->new( file => $filename )->store( $self->freeze() ); + my ( $self, $filename, @args ) = @_; + MooseX::Storage::Engine::IO::AtomicFile->new( file => $filename )->store( $self->freeze(@args) ); } +no Moose::Role; + 1; __END__ @@ -19,11 +23,29 @@ __END__ =head1 NAME -MooseX::Storage::IO::AtomicFile +MooseX::Storage::IO::AtomicFile - An Atomic File I/O role =head1 SYNOPSIS -=head1 DESCRIPTION + package Point; + use Moose; + use MooseX::Storage; + + with Storage('format' => 'JSON', 'io' => 'AtomicFile'); + + has 'x' => (is => 'rw', isa => 'Int'); + has 'y' => (is => 'rw', isa => 'Int'); + + 1; + + my $p = Point->new(x => 10, y => 10); + + ## methods to load/store a class + ## on the file system + + $p->store('my_point.json'); + + my $p2 = Point->load('my_point.json'); =head1 METHODS @@ -45,7 +67,7 @@ MooseX::Storage::IO::AtomicFile =head1 BUGS -All complex software has bugs lurking in it, and this module is no +All complex software has bugs lurking in it, and this module is no exception. If you find a bug please either email me, or add the bug to cpan-RT. @@ -57,7 +79,7 @@ Stevan Little Estevan.little@iinteractive.comE =head1 COPYRIGHT AND LICENSE -Copyright 2007 by Infinity Interactive, Inc. +Copyright 2007-2008 by Infinity Interactive, Inc. L