BuildDiff: slight cleanup
Remove debugging Data::Dumper import, make comment describing function inputs more readable.
This commit is contained in:
parent
ef6a2c96e7
commit
b98dbe01c3
|
@ -9,8 +9,6 @@ our @EXPORT = qw(
|
||||||
buildDiff
|
buildDiff
|
||||||
);
|
);
|
||||||
|
|
||||||
use Data::Dumper;
|
|
||||||
|
|
||||||
sub cmpBuilds {
|
sub cmpBuilds {
|
||||||
my ($left, $right) = @_;
|
my ($left, $right) = @_;
|
||||||
return $left->get_column('job') cmp $right->get_column('job')
|
return $left->get_column('job') cmp $right->get_column('job')
|
||||||
|
@ -18,8 +16,9 @@ sub cmpBuilds {
|
||||||
}
|
}
|
||||||
|
|
||||||
sub buildDiff {
|
sub buildDiff {
|
||||||
|
# $builds is the list of current builds
|
||||||
|
# $builds2 is the list of previous (to-be-compared-to) builds
|
||||||
my ($builds, $builds2) = @_;
|
my ($builds, $builds2) = @_;
|
||||||
# $builds is the list of current builds, and $builds2 is the list of previous (compared-to) builds
|
|
||||||
|
|
||||||
$builds = [sort { cmpBuilds($a, $b) } @{$builds}];
|
$builds = [sort { cmpBuilds($a, $b) } @{$builds}];
|
||||||
$builds2 = [sort { cmpBuilds($a, $b) } @{$builds2}];
|
$builds2 = [sort { cmpBuilds($a, $b) } @{$builds2}];
|
||||||
|
|
Loading…
Reference in a new issue