blob: a1c000d34627e353612ed5f94513136f25167587 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
#! /usr/bin/env perl
package Net::MulkyID::Builder;
use Module::Build;
our @ISA = 'Module::Build';
sub new {
my ($class, @args) = @_;
my $self = $class->SUPER::new(@args);
return bless $self, $class;
#my $self = $self->SUPER::new();
#return $self;
#return bless {}, shift;
}
sub ACTION_build {
my ($self, @args) = @_;
eval "use Net::MulkyID::Setup; setup();";
#return SUPER::ACTION_build($self, @args);
}
1;
|