Re: [Module-build-general] 4th (undocumented) argument to ExtUtils::Install::install
Status: Beta
Brought to you by:
kwilliams
|
From: Dave R. <au...@ur...> - 2003-02-09 18:32:55
|
On Sun, 9 Feb 2003, Ken Williams wrote:
> So, I made this change in the M::B code, and it didn't seem to produce
> the desired effect:
>
> ------------------------------------------------------------------------
> --------
> sub ACTION_install {
> my ($self) = @_;
> require ExtUtils::Install;
> $self->depends_on('build');
> ExtUtils::Install::install($self->install_map('blib'), 1, 0,
> $self->{args}{uninst}||0);
> }
>
> sub ACTION_fakeinstall {
> my ($self) = @_;
> require ExtUtils::Install;
> $self->depends_on('build');
> ExtUtils::Install::install($self->install_map('blib'), 1, 1,
> $self->{args}{uninst}||0);
> }
> ------------------------------------------------------------------------
> --------
>
> Doing a 'Build install uninst=1' didn't unlink the ghosties. I don't
> have time to check into it right now though, because I'm busily at work
> trying to make some headway on my soon-due thesis. Any idea why this
> wouldn't work?
It'll only unlink a shadowing file _if and only if_ it is installing a new
file. So if you just run "./Build install uninst=1" and nothing has
changed, then nothing gets unlinked.
I don't know if this is correct, but that's the deal ;)
Also, for extra fun, note that EU::Install prints messages like this:
## Running 'make install UNINST=1' will unlink $plural for you.\n
direct to STDOUT. It'd be nice to catch that and rewrite it in M::B
language, but what an annoying PITA.
-dave
/*=======================
House Absolute Consulting
www.houseabsolute.com
=======================*/
|