The following commit has been merged in the master branch:
commit 97c72c3c14f00b0c8092bf5e3d7a2a5c69cfe9ef
Author: Niels Thykier <[email protected]>
Date: Sun Jan 27 12:07:06 2013 +0100
lintian: Remove redundant loop
Signed-off-by: Niels Thykier <[email protected]>
diff --git a/frontend/lintian b/frontend/lintian
index 602f200..d1ec7d4 100755
--- a/frontend/lintian
+++ b/frontend/lintian
@@ -1242,38 +1242,14 @@ sub prep_unpack_error {
sub unpack_group {
my ($gname, $group) = @_;
- my @lpkgs = ();
my $errhandler = sub { prep_unpack_error ($group, @_) };
- foreach my $lpkg ($group->get_processables){
- my $pkg_name = $lpkg->pkg_name;
- my $pkg_type = $lpkg->pkg_type;
- my $pkg_ver = $lpkg->pkg_version;
- my $pkg_arch = $lpkg->pkg_arch;
- my $base;
-
- if (!defined $lpkg) {
- my $err = '.';
- $err = ": $@" if defined $@;
- warning("skipping $action of $pkg_type package ${pkg_name}$err");
- $exit_code = 2;
- $group->remove_processable ($lpkg);
- next;
- }
-
- push @lpkgs, $lpkg;
-
- # determine base directory
- $base = $lpkg->base_dir();
- debug_msg(1, "Unpacking $pkg_name $pkg_ver [$pkg_arch] ($pkg_type) in
$base");
- }
-
# Kill pending jobs, if any
$unpacker->kill_jobs;
$unpacker->reset_worklist;
# Stop here if there is nothing list for us to do
- return unless $unpacker->prepare_tasks ($errhandler, @lpkgs);
+ return unless $unpacker->prepare_tasks ($errhandler,
$group->get_processables);
v_msg ("Unpacking packages in group $gname");
--
Debian package checker
--
To UNSUBSCRIBE, email to [email protected]
with a subject of "unsubscribe". Trouble? Contact [email protected]
Archive: http://lists.debian.org/[email protected]
