X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FStorage%2FEngine%2FIO%2FAtomicFile.pm;fp=lib%2FMooseX%2FStorage%2FEngine%2FIO%2FAtomicFile.pm;h=e48cabdf2b4c25614c45ce5a9f47726957d4017d;hb=d1f98188a6568ce657a6ad45a26247b6d6a5acc1;hp=c84c3667a7f590d7d6e3e4bd868a86b3eab4aa2c;hpb=4f94761e9fd6f813b81a201c50aecd5bdac2a80f;p=gitmo%2FMooseX-Storage.git diff --git a/lib/MooseX/Storage/Engine/IO/AtomicFile.pm b/lib/MooseX/Storage/Engine/IO/AtomicFile.pm index c84c366..e48cabd 100644 --- a/lib/MooseX/Storage/Engine/IO/AtomicFile.pm +++ b/lib/MooseX/Storage/Engine/IO/AtomicFile.pm @@ -1,12 +1,11 @@ package MooseX::Storage::Engine::IO::AtomicFile; use Moose; -use IO::AtomicFile; - extends 'MooseX::Storage::Engine::IO::File'; sub store { my ($self, $data) = @_; + require IO::AtomicFile; my $fh = IO::AtomicFile->new($self->file, 'w') || confess "Unable to open file (" . $self->file . ") for storing : $!"; $fh->binmode(':utf8') if utf8::is_utf8($data);