diff options
Diffstat (limited to 'ext/XS-APItest/t/handy.t')
| -rw-r--r-- | ext/XS-APItest/t/handy.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ext/XS-APItest/t/handy.t b/ext/XS-APItest/t/handy.t index b6eaa3e8cd..a85f701e99 100644 --- a/ext/XS-APItest/t/handy.t +++ b/ext/XS-APItest/t/handy.t @@ -453,6 +453,8 @@ foreach my $name (sort keys %to_properties) { } # This is primarily to make sure that no non-Unicode warnings get generated -is(scalar @warnings, 0, "No warnings were generated " . join ", ", @warnings); +unless (is(scalar @warnings, 0, "No warnings were generated")) { + diag @warnings; +} done_testing; |