On Sat, Nov 12, 2005 at 03:18:01AM -0800, Steve Langasek wrote:
> # Now: See if it is in this package. See if it is in any other package.
> sub searchdir {
> my $dir = shift;
> if(opendir(DIR, $dir)) {
> my @dirents = readdir(DIR);
> closedir(DIR);
> for (@dirents) {
> if ( -f "$dir/$_/DEBIAN/shlibs" ) {
> push(@curshlibs, "$dir/$_/DEBIAN/shlibs");
> next;
> } elsif ( $_ !~ /^\./ && -d "$dir/$_" && ! -l "$dir/$_" ) {
> &searchdir("$dir/$_");
> }
> }
> }
> }
>
> This function apparently isn't content to look for
> debian/$pkg/DEBIAN/shlibs; it feels a need to look for things like
> debian/xfonts-75dpi-transcoded/usr/X11R6/lib/X11/fonts/75dpi/helvB24-ISO8859-9.pcf.gz/DEBIAN/shlibs
> as well.
To account for more interesting ideas that maintainers could have I
would propose the following compromise: Replace the elsif line with
} elsif ( ! -e "$dir/$_/DEBIAN" && !~ /^\./ && -d "$dir/$_" && ! -l "$dir/$_" )
{
This at least eliminates the search within the packages that have no
shlibs file which should be the major cause for massive recursion.
Gruesse,
--
Frank Lichtenheld <[EMAIL PROTECTED]>
www: http://www.djpig.de/
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]
