On Wed, Apr 06, 2005 at 07:13:26PM +0200, Rafael Garcia-Suarez wrote:
> > That's not going to work.
> >
> > push @dirs, qw($(INST_LIBDIR) $(INST_ARCHLIBDIR)) if $self->{PERL_CORE};
> >
> > would be better, but it will remove too many things though.
> > What I need is to remove all .pm files installed in lib/ during the
> > compilation
> > process, and their parent directories if becomed empty.
>
> OK, here's a patch that works : (against MM's trunk)
Yep, you're right. It used to do that and I removed it assuming that
it would be cleaned up when blib/ was deleted. But there's no blib here.
> + push @dirs, qw($(INST_AUTODIR) $(INST_ARCHAUTODIR)) if
> $self->{PERL_CORE};
> + push @files, values %{$self->{PM}} if $self->{PERL_CORE};
> +
> if( $self->has_link_code ){
> push @files, qw($(OBJECT));
> }
