lib/MogileFS/Factory/Device.pm

   1 package MogileFS::Factory::Device;
   2 use strict;
   3 use warnings;
   4 use base 'MogileFS::Factory';
   5
   6 use MogileFS::Device;
   7
   8 sub set {
   9     my ($self, $args) = @_;
  10     my $hostfactory = MogileFS::Factory::Host->get_factory;
  11     return $self->SUPER::set(MogileFS::Device->new_from_args($args, $hostfactory));
  12 }
  13
  14 1;