Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv15706/lib/Module/Build
Modified Files:
Base.pm
Log Message:
Fix tests to ignore any user defined '~/.modulebuildrc' file.
Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.405
retrieving revision 1.406
diff -u -d -r1.405 -r1.406
--- Base.pm 31 Mar 2005 09:01:38 -0000 1.405
+++ Base.pm 31 Mar 2005 09:40:13 -0000 1.406
@@ -476,7 +476,7 @@
skip_rcfile
);
-INIT {
+{
my @prereq_actions = ( 'Build_PL', __PACKAGE__->known_actions );
my @prereq_types = qw( requires recommends conflicts );
__PACKAGE__->add_property(prereq_actions => \@prereq_actions);
@@ -1024,10 +1024,11 @@
sub _call_action {
my ($self, $action) = @_;
- return if $self->{_completed_actions}{$action}++;
$self->validate_action_prereqs( $action );
+ return if $self->{_completed_actions}{$action}++;
+
local $self->{action} = $action;
my $method = "ACTION_$action";
die "No action '$action' defined, try running the 'help' action.\n" unless $self->can($method);
|