lib/MooseX/Storage.pm

   1
   2
   3 package MooseX::Storage;
   4
   5 sub import {
   6     my $pkg = caller();
   7     $pkg->meta->alias_method('Storage' => sub {
   8         my $engine = shift;
   9         return 'MooseX::Storage::' . $engine;
  10     });
  11 }
  12
  13 package MooseX::Storage::Base;
  14 use Moose::Role;
  15
  16 requires 'load';
  17 requires 'store';
  18
  19 requires 'freeze';
  20 requires 'thaw';
  21
  22 1;
  23
  24 __END__