/[Frey]/branches/mojo/lib/Frey/Storage.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /branches/mojo/lib/Frey/Storage.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 228 by dpavlin, Sat Nov 1 13:06:31 2008 UTC revision 260 by dpavlin, Tue Nov 4 22:12:07 2008 UTC
# Line 21  has 'storage_timestamp' => ( Line 21  has 'storage_timestamp' => (
21  sub store {  sub store {
22          my $self = shift;          my $self = shift;
23          my ( $filename, $data ) = @_;          my ( $filename, $data ) = @_;
24          $filename .= '.yml';          $filename .= '.yml' unless $filename =~ m{\.ya?ml$}i;
25          $self->mkbasepath( $filename );          $self->mkbasepath( $filename );
26          DumpFile( $filename, $data );          DumpFile( $filename, $data );
27            warn "created $filename ", -s $filename;
28  }  }
29    
30  =head2 load  =head2 load
Legend:
Removed from v.228  
changed lines
  Added in v.260
  ViewVC Help
Powered by ViewVC 1.1.26