Re: [Module-build-general] make doesn't create man pages

[Ken W. <ke...@ma...>]

On Saturday, August 2, 2003, at 08:26  PM, Ken Williams wrote:

>
> On Friday, August 1, 2003, at 06:42  PM, Steve Purkis wrote:
>
>> Hmm...  that sounds like a good idea.  Maybe store everything in 
>> $self->{_completed_actions} or something.  Can't promise anything, 
>> but I'll have a look into it in my copious amounts of free time next 
>> week.
>
> It shouldn't be too hard for me to patch it up myself, actually.  I'll 
> let you know.

I put this patch in yesterday, along with a new test to make sure it's 
working.

===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.158
retrieving revision 1.159
diff -u -r1.158 -r1.159
--- lib/Module/Build/Base.pm    1 Aug 2003 20:57:11 -0000       1.158
+++ lib/Module/Build/Base.pm    3 Aug 2003 01:38:37 -0000       1.159
@@ -778,6 +778,7 @@

  sub dispatch {
    my $self = shift;
+  local $self->{_completed_actions} = {};

    if (@_) {
      my ($action, %p) = @_;
@@ -794,6 +795,7 @@

  sub _call_action {
    my ($self, $action) = @_;
+  return if $self->{_completed_actions}{$action}++;
    local $self->{action} = $action;
    my $method = "ACTION_$action";
    die "No action '$action' defined" unless $self->can($method);
===================================================================

  -Ken