[ Mini Kiebo ]

Server: Windows NT DESKTOP-5B8S0D4 6.2 build 9200 (Windows 8 Professional Edition) i586 Path: D:/xampp182/perl/vendor/lib/Moo/HandleMoose/ [ Home ]

File: FakeMetaClass.pm

package Moo::HandleMoose::FakeMetaClass;

sub DESTROY { }

sub AUTOLOAD {
  my ($meth) = (our $AUTOLOAD =~ /([^:]+)$/);
  require Moo::HandleMoose;
  Moo::HandleMoose::inject_real_metaclass_for((shift)->{name})->$meth(@_)
}
sub can {
  require Moo::HandleMoose;
  Moo::HandleMoose::inject_real_metaclass_for((shift)->{name})->can(@_)
}
sub isa {
  require Moo::HandleMoose;
  Moo::HandleMoose::inject_real_metaclass_for((shift)->{name})->isa(@_)
}
sub make_immutable { $_[0] }

1;