[SCM] Debian package checker branch, master, updated. 2.5.11-153-gddc36de
The following commit has been merged in the master branch:
commit ddc36de0e9a05899a8ff3406d6c1ebabfe0ba6cd
Author: Niels Thykier <niels@thykier.net>
Date: Wed Feb 13 23:44:54 2013 +0100
coll/{file-info,md5sums}: Remove redundant code
Signed-off-by: Niels Thykier <niels@thykier.net>
diff --git a/collection/file-info b/collection/file-info
index 1135fd3..e2f94bc 100755
--- a/collection/file-info
+++ b/collection/file-info
@@ -34,7 +34,6 @@ use Lintian::Util qw(fail);
sub collect {
my ($pkg, $type, $dir) = @_;
my $info = Lintian::Collect->new ($pkg, $type, $dir);
-my $last = '';
my $helper = realpath (__FILE__ . '-helper');
my $outfile = "$dir/file-info.gz";
@@ -61,7 +60,6 @@ spawn(\%opts, ['xargs', '-0r', 'file', '-NF', '', '--print0', '--'], '|', [$help
$opts{pipe_in}->blocking(1);
foreach my $file ($info->sorted_index) {
- next unless $file; # ignore "root-dir" which has "no name" (post stripping).
printf {$opts{pipe_in}} "%s\0", $file;
}
diff --git a/collection/md5sums b/collection/md5sums
index 8b65a65..252baf4 100755
--- a/collection/md5sums
+++ b/collection/md5sums
@@ -48,7 +48,6 @@ spawn(\%opts, ['xargs', '-0r', 'md5sum'] );
$opts{pipe_in}->blocking(1);
foreach my $file ($info->sorted_index) {
- next unless $file;
next unless $info->index ($file)->is_file;
printf {$opts{pipe_in}} "%s\0", $file;
}
--
Debian package checker
Reply to: