Merge pull request #1060 from DeterminateSystems/runcommand-t-fixups
Runcommand.t: minor cleanup
This commit is contained in:
commit
bb040aa029
|
@ -40,15 +40,12 @@ ok(sendNotifications(), "Notifications execute successfully.");
|
|||
my $dat = do {
|
||||
my $filename = $ENV{'HYDRA_DATA'} . "/joboutput.json";
|
||||
open(my $json_fh, "<", $filename)
|
||||
or die("Can't open \$filename\": $!\n");
|
||||
or die("Can't open \"$filename\": $!\n");
|
||||
local $/;
|
||||
my $json = JSON->new;
|
||||
$json->decode(<$json_fh>)
|
||||
};
|
||||
|
||||
use Data::Dumper;
|
||||
print Dumper($dat);
|
||||
|
||||
subtest "Validate the top level fields match" => sub {
|
||||
is($dat->{build}, $newbuild->id, "The build event matches our expected ID.");
|
||||
is($dat->{buildStatus}, 0, "The build status matches.");
|
||||
|
|
Loading…
Reference in a new issue