X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2F01-jobs.t;h=f44a1e893c631878f0578d865d5de3a2aa4de96f;hb=5b0c03b69d4a9087ec07a92d8273b240407ff663;hp=d0c928b3b2f827a1d37d1cb674c0ab2ae25f2324;hpb=00a45f8933036eabf15f9298af266e5d175121fb;p=gruntmaster-daemon.git diff --git a/t/01-jobs.t b/t/01-jobs.t index d0c928b..f44a1e8 100644 --- a/t/01-jobs.t +++ b/t/01-jobs.t @@ -48,9 +48,10 @@ sub check_job{ if (defined $meta->{results}) { delete $meta->{results}[$_]{time} for keys @{$meta->{results}}; } - is $meta->{result}, $meta->{expected_result}, "Result is correct"; - is $meta->{result_text}, $meta->{expected_result_text}, "Result text is correct"; - is_deeply $meta->{results}, $meta->{expected_results}, "Results are correct"; + my $desc = $meta->{name} . ': ' . $meta->{test_name}; + is $meta->{result}, $meta->{expected_result}, "Result is correct ($desc)"; + is $meta->{result_text}, $meta->{expected_result_text}, "Result text is correct ($desc)"; + is_deeply $meta->{results}, $meta->{expected_results}, "Results are correct ($desc)"; } my @problems = exists $ENV{TEST_PROBLEMS} ? map {"t/problems/$_"} split ' ', $ENV{TEST_PROBLEMS} : ;