Author: dagolden
Date: Sun Aug 16 11:57:10 2009
New Revision: 13199
Modified:
Module-Build/trunk/t/lib/DistGen.pm
Log:
forgot to extract self from args to run_build* in DistGen
Modified: Module-Build/trunk/t/lib/DistGen.pm
==============================================================================
--- Module-Build/trunk/t/lib/DistGen.pm (original)
+++ Module-Build/trunk/t/lib/DistGen.pm Sun Aug 16 11:57:10 2009
@@ -490,13 +490,13 @@
########################################################################
sub run_build_pl {
- my (@args) = @_;
+ my ($self, @args) = @_;
require Module::Build;
Module::Build->run_perl_script('Build.PL', [], [...@args])
}
sub run_build {
- my (@args) = @_;
+ my ($self, @args) = @_;
require Module::Build;
my $build_script = $^O eq 'VMS' ? 'Build.com' : 'Build';
Module::Build->run_perl_script($build_script, [], [...@args])