[svn:Module-Build] r13199 - Module-Build/trunk/t/lib

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])