BuildDiff: make actual hash ref

This commit is contained in:
Cole Helbling 2022-01-10 10:02:39 -08:00
parent 0eb952d72d
commit 0c51f3ca7d
2 changed files with 4 additions and 4 deletions

View file

@ -18,7 +18,7 @@ use Data::Dumper;
sub buildDiff {
my ($builds, $builds2) = @_;
my $ret = [
my $ret = {
stillSucceed => [],
stillFail => [],
nowSucceed => [],
@ -28,7 +28,7 @@ sub buildDiff {
unfinished => [],
aborted => [],
failed => [],
];
};
my $n = 0;
foreach my $build (@{$builds}) {

View file

@ -9,7 +9,7 @@ my $ctx = test_context();
subtest "response" => sub {
my $ret = buildDiff([], []);
is($ret, [
is($ret, {
stillSucceed => [],
stillFail => [],
nowSucceed => [],
@ -19,7 +19,7 @@ subtest "response" => sub {
unfinished => [],
aborted => [],
failed => [],
]);
});
};
is(1, 1);