Bug #29796 for CPANPLUS: error with funktion 'o' after installing Alien::wxWidgets

Fri Oct 05 10:24:13 2007 gw [...] green-stores.de - Ticket created

Subject:	error with funktion 'o' after installing Alien::wxWidgets
Date:	Fri, 05 Oct 2007 16:23:23 +0200
To:	bug-CPANPLUS [...] rt.cpan.org
From:	Gerrit Wichert <gw [...] green-stores.de>

Hello, after successfully installation of the 'Alien::wxWidgets' module using CPANPLUS, i'm no longer able to list all modules that are out of date via the 'o' command. I allways get the following error message: CPAN Terminal> o [ERROR] /usr/lib/perl5/site_perl/5.8.8/i586-linux-thread-multi/Alien/wxWidgets/gtk_2_8_4/lib/libwx_base-2.8.so.0 is encountered a second time at /usr/lib/perl5/5.8.8/File/Find.pm line 542. when deinstalling the package then CPANPLUS again works as expected. runnig a find for 'libwx_base-2.8.so.0' shows two copies in the install cache but deleteing the whole packages from the install cache won't help with this error. I have had this error with recent versions of CPANPLUS and Alien::wxWidgets. my actual configuration is : OS : openSUSE 10.2 jupiter:~ # uname -a Linux jupiter 2.6.18.8-0.5-default #1 SMP Fri Jun 22 12:17:53 UTC 2007 i686 athlon i386 GNU/Linux jupiter:~ # perl -v This is perl, v5.8.8 built for i586-linux-thread-multi CPANPLUS: CPANPLUS::Shell::Default -- CPAN exploration and module installation (v0.82) *** Please report bugs to <bug-cpanplus@rt.cpan.org>. *** Using CPANPLUS::Backend v0.82. ReadLine support enabled. I hope this is usefull to you regards Gerrit Wichert

Mon Oct 08 05:40:18 2007 kane [...] cpan.org - Correspondence added

From:

KANE [...] cpan.org

On Fri Oct 05 10:24:13 2007, gw@green-stores.de wrote: Show quoted text

> CPAN Terminal> o > > [ERROR] /usr/lib/perl5/site_perl/5.8.8/i586-linux-thread- > multi/Alien/wxWidgets/gtk_2_8_4/lib/libwx_base-2.8.so.0 is encountered > a second time at /usr/lib/perl5/5.8.8/File/Find.pm line 542.

Thanks for reporting -- Alien::WxWidgets symlinks the .so file several times, and the default setting of File::Find is to die when it encounters the same symlink several times (don't ask me why...) I've applied the following patch, which resolves the issue for me, and will be in the next release of CPANPLUS: --- lib/CPANPLUS/Internals/Search.pm (revision 2368) +++ lib/CPANPLUS/Internals/Search.pm (local) @@ -256,15 +256,18 @@ my $conf = $self->configure_object; my %hash = @_; my %seen; my @rv; + ### File::Find uses follow_skip => 1 by default, which doesn't die + ### on duplicates, unless they are directories or symlinks. + ### Ticket #29796 shows this code dying on Alien::WxWidgets. + ### File::Find doc says to use follow_skip => 2 to ignore duplicates + ### so this should stop it from dying. + my %find_args = ( follow_skip => 2 );

Mon Oct 08 05:40:51 2007 The RT System itself - Status changed from 'new' to 'open'

Mon Oct 08 05:43:51 2007 kane [...] cpan.org - Status changed from 'open' to 'resolved'