+sub dist_core {
+ my $dist = shift->SUPER::dist_core(@_);
+ $dist =~ s/^(\s*dist\s*:+\s*)/$1testvg_dist /m;
+ return <<DISTCORE . $dist;
+testvg_dist :
+ \$(CP) lib/Test/Valgrind/Suppressions.{tpl,pm}
+ \$(RM) lib/$supp
+ \$(TOUCH) lib/$supp
+DISTCORE
+}
+
+sub test {
+ my $test = shift->SUPER::test(@_);
+ my ($target) = $test =~ /^\s*(test\s*:+)/m;
+ return "$target Makefile.bak blib/archpub/$supp\n$test";
+}
+