This is an automated email from the git hooks/post-receive script. nthykier pushed a commit to branch master in repository lintian.
commit 9a9631fa24c8b2d088213bebbadd01e1a7faae1f Author: Niels Thykier <[email protected]> Date: Sun Feb 16 11:31:39 2014 +0100 r/harness: Replace ad-hoc comparator Signed-off-by: Niels Thykier <[email protected]> --- reporting/harness | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/reporting/harness b/reporting/harness index 3769df7..164838c 100755 --- a/reporting/harness +++ b/reporting/harness @@ -132,8 +132,7 @@ require Lintian::Lab; require Lintian::Lab::Manifest; require Lintian::Processable; require Lintian::Relation::Version; -import Lintian::Relation::Version - qw(versions_comparator versions_equal versions_lt); +import Lintian::Relation::Version qw(versions_comparator); require Lintian::Util; import Lintian::Util qw(open_gz slurp_entire_file strip visit_dpkg_paragraph load_state_cache find_backlog); @@ -322,10 +321,9 @@ unless ($opt{'reports-only'}) { } # Sort so that the worklist is also sorted (makes it easier to review). - my $comparator = sub { versions_lt($a, $b) ? -1 : 1; }; foreach my $gname (sort keys %dirty_groups) { my $dver = $dirty_groups{$gname}; - foreach my $gversion (sort $comparator keys %$dver) { + for my $gversion (sort versions_comparator keys %{$dver}) { my $group_id = "${gname}/${gversion}"; my $query = "GROUP:${group_id}"; my @res = $LAB->lab_query($query); -- Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/lintian/lintian.git -- To UNSUBSCRIBE, email to [email protected] with a subject of "unsubscribe". Trouble? Contact [email protected] Archive: http://lists.debian.org/[email protected]
