Directory.pm 274 B

123456789101112
  1. package NIC::Formats::NICTar::Directory;
  2. use parent qw(NIC::Formats::NICTar::_TarMixin NIC::NICBase::Directory);
  3. use strict;
  4. sub _take_init {
  5. my $self = shift;
  6. $self->NIC::NICBase::Directory::_take_init(@_);
  7. $self->NIC::Formats::NICTar::_TarMixin::_take_init(@_);
  8. }
  9. 1;