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

[SCM] Debian package checker branch, infra-513663, updated. 2.5.0-rc1-65-gb55a170



The following commit has been merged in the infra-513663 branch:
commit b55a1703b6b402b6c773db6d653a92e121ce2fa5
Author: Niels Thykier <niels@thykier.net>
Date:   Sun Mar 27 22:48:31 2011 +0200

    Added get_binary_processables to ProcessableGroup

diff --git a/lib/Lintian/ProcessableGroup.pm b/lib/Lintian/ProcessableGroup.pm
index f592658..c53acb8 100644
--- a/lib/Lintian/ProcessableGroup.pm
+++ b/lib/Lintian/ProcessableGroup.pm
@@ -229,6 +229,25 @@ sub get_changes_processable {
     return $self->{changes};
 }
 
+=item $group->get_binary_processables()
+
+Returns all binary (and udeb) processables in $group.
+
+If $group does not have any binary processables then an empty list (or a
+ref to an empty list) is returned (based on context).
+
+=cut
+
+sub get_binary_processables {
+    my ($self) = @_;
+    my @result = ();
+    foreach my $type (qw(binary udeb)){
+        push @result, values %{$self->{$type}} if (exists $self->{$type});
+    }
+    return wantarray ? @result : \@result;
+}
+
+
 =back
 
 =head1 AUTHOR

-- 
Debian package checker


Reply to: