[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

[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: