* Leon Timmermans <faw...@gmail.com> [2013-09-18T19:21:44] > Or both just setting $Test::Harness::switches = ''…
Yes. I was cleaning out ~/tmp on the flight over here and I found this dzil
plugin:
package inc::STFUEUMM;
use Moose;
extends 'Dist::Zilla::Plugin::MakeMaker';
use namespace::autoclean;
after setup_installer => sub {
my ($self) = @_;
my ($file) = grep { $_->name eq 'Makefile.PL' } @{ $self->zilla->files };
my $content = $file->content;
$content .= <<'END_AWFUL_HACK';
sub MY::test_via_harness {
my($self, $perl, $tests) = @_;
return qq{\t$perl "-MExtUtils::Command::MM" }.
qq{"-e" "require Test::Harness; undef *Test::Harness::Switches;
test_harness(\$(TEST_VERBOSE), '\$(INST_LIB)', '\$(INST_ARCHLIB)')" $tests\n};
}
END_AWFUL_HACK
$file->content($content);
};
I hadn't published that before because AndyA applied my patch to Test::Harness.
Hmm...
--
rjbs
signature.asc
Description: Digital signature
