bughz
/
sigar
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

use SigarWrapper.pm

This commit is contained in:
Doug MacEachern 2007-09-03 00:20:38 +00:00
parent 682f1f6ffa
commit 383c8f95c7
1 changed files with 3 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
bindings/perl/Makefile.PL
View File

@ -2,8 +2,9 @@ use ExtUtils::MakeMaker;
use Config;
use File::Copy 'cp';
use lib qw(lib);
use lib qw(.. lib);
use Sigar::ArchName ();
use SigarWrapper ();
my $installdir;
if ($ARGV[0]) {
@ -19,15 +20,7 @@ else {
}
}
my $generated_xs = "Sigar_generated.xs";
my $build_xs = "../java/build/src/$generated_xs";
if (-e $build_xs) {
#XXX should be done in the generated Makefile
if ((stat $generated_xs)[9] < (stat $build_xs)[9]) {
print "Updating $generated_xs from $build_xs\n";
cp $build_xs, $generated_xs;
}
}
SigarWrapper::generate(Perl => '.');
my $archname = Sigar::ArchName->get_name();