[SCM] Debian package checker branch, master, updated. 2.2.6-65-g69bc0fc
The following commit has been merged in the master branch:
commit c77c9081df195ac2670114f37dc8c91618d47bb3
Author: Russ Allbery <rra@debian.org>
Date: Sun Mar 8 17:03:04 2009 -0700
Ignore leading whitespace in source package Files sections
* unpack/unpack-srcpkg-l1:
+ [RA] Ignore leading whitespace in the Files section.
diff --git a/debian/changelog b/debian/changelog
index bd521fe..2ed6203 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -155,6 +155,7 @@ lintian (2.2.7) UNRELEASED; urgency=low
get the next burst of data. (Closes: #517899)
+ [RA] Do a little bit of parallelization when writing out the sorted
index of the source package.
+ + [RA] Ignore leading whitespace in the Files section.
-- Russ Allbery <rra@debian.org> Sun, 22 Feb 2009 13:24:23 -0800
diff --git a/unpack/unpack-srcpkg-l1 b/unpack/unpack-srcpkg-l1
index a68a5be..ce01f14 100755
--- a/unpack/unpack-srcpkg-l1
+++ b/unpack/unpack-srcpkg-l1
@@ -72,7 +72,8 @@ my $base = $data->{'source'} . '_' . $version;
symlink($file,"$base_dir/dsc") or fail("cannot symlink dsc file: $!");
my $tarball;
for my $fs (split(/\n/,$data->{'files'})) {
- next if $fs =~ /^\s*$/o;
+ $fs =~ s/^\s*//;
+ next if $fs =~ /^$/o;
my @t = split(/\s+/o,$fs);
if ($t[2] =~ /^(\Q$base\E\.orig|\Q$baserev\E)\.tar\.(gz|bz2|lzma)$/) {
$tarball = $t[2];
--
Debian package checker
Reply to: