File Coverage

blib/lib/Event/MakeMaker.pm

Criterion	Covered	Total	%
statement	12	15	80.0
branch			n/a
condition			n/a
subroutine	4	5	80.0
pod	0	1	0.0
total	16	21	76.1

use strict;
package Event::MakeMaker;
use Config;
use base 'Exporter';
use vars qw(@EXPORT_OK $installsitearch);
@EXPORT_OK = qw(&event_args $installsitearch);

my %opt;
for my $opt (split /:+/, $ENV{PERL_MM_OPT}) {
    my ($k,$v) = split /=/, $opt;
    $opt{$k} = $v;
}

my $extra = $Config{sitearch};
$extra =~ s,$Config{prefix},$opt{PREFIX}, if
    exists $opt{PREFIX};

for my $d ($extra, @INC) {
    if (-e "$d/Event/EventAPI.h") {
	$installsitearch = $d;
	last
    }
}

sub event_args {
    my %arg = @_;
    $arg{INC} .= " -I$installsitearch/Event";
    %arg;
}

1;
__END__