Package: debpool
Version: 0.2.2
Followup-For: Bug #317390
Hi,
I found the place where the problem eventually sits. It's line 396 in
/usr/share/debpool/perl5/DebPool/Dirs.pm, the line reads:
if ($section =~ m/$check_section\/.+/) {
Now, I'm not absolutely sure what happens here, but when using a clean
repository and having
$Options{'sections'} = [ 'main', 'non-free'];
This fails, i.e. somehow Perl find "non-free" not to be identical to
"non-free", I guess because of the "\/.+" at the end of the Regexp. At
the point where this match happens (from the Packages.pm Module) there
is no complex section anymore (like non-free/web) but only the foremost
part is visible here (Line 567 in Packages.pm). I guess debpool is
removing the rest before reaching this point.
I think the correct fix would be to change that line to read
if ($section =~ m/($check_section|$check_section\/.+)/) {
or if the second part (with the \/.+) is not used anymore it can be
reduced to just $check_section.
HTH
Andreas
-- System Information:
Debian Release: testing/unstable
APT prefers unstable
APT policy: (990, 'unstable'), (500, 'experimental')
Architecture: i386 (i686)
Shell: /bin/sh linked to /bin/bash
Kernel: Linux 2.6.12-cherry+noradeon+8139c+
Locale: LANG=de_DE.UTF-8, LC_CTYPE=de_DE.UTF-8 (charmap=UTF-8)
Versions of packages debpool depends on:
ii perl 5.8.7-4 Larry Wall's Practical Extraction
Versions of packages debpool recommends:
ii gnupg 1.4.1-1 GNU privacy guard - a free PGP rep
ii libdigest-sha1-perl 2.10-1 NIST SHA-1 message digest algorith
pn libproc-daemon-perl <none> (no description available)
ii perl [libdigest-md5-perl] 5.8.7-4 Larry Wall's Practical Extraction
-- no debconf information
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]