X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=inc%2FMMPackageStash.pm;h=d47111469f23c1fbc3bdbe545cef7cab1f68a5e6;hb=86cf2011e6d3db989f65c31979a00a1acf30220e;hp=bcbc48eb7546da2f843643be2bdfec59fb5dc9c6;hpb=70d7962e28eed7d00bd07c493f8dd5c01a8e3711;p=gitmo%2FPackage-Stash.git diff --git a/inc/MMPackageStash.pm b/inc/MMPackageStash.pm index bcbc48e..d471114 100644 --- a/inc/MMPackageStash.pm +++ b/inc/MMPackageStash.pm @@ -22,7 +22,7 @@ sub can_run { for my $dir ((split /$Config::Config{path_sep}/, $ENV{PATH}), '.') { next if $dir eq ''; - my $abs = File::Spec->catfile($dir, $_[1]); + my $abs = File::Spec->catfile($dir, $_[0]); return $abs if (-x $abs or $abs = MM->maybe_command($abs)); } @@ -44,7 +44,9 @@ CAN_CC my $template = $self->$orig(@_); - $template =~ s/(WriteMakefile\()/delete \$WriteMakefileArgs{PREREQ_PM}{'Package::Stash::XS'}\n unless can_cc();\n\n$1/; + my $xs_version = $self->zilla->prereqs->requirements_for('runtime', 'recommends')->as_string_hash->{'Package::Stash::XS'}; + + $template =~ s/(WriteMakefile\()/\$WriteMakefileArgs{PREREQ_PM}{'Package::Stash::XS'} = $xs_version\n if can_cc();\n\n$1/; return $template . $can_cc; };