diff options
author | Karl Williamson <khw@cpan.org> | 2021-03-30 16:54:46 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2021-04-03 09:49:08 -0600 |
commit | 8fa44a45a6d052f95480fa59734072a7868b0512 (patch) | |
tree | 303e4bdd9b72b29507dfab2f903653b578352b72 /ext | |
parent | c82bc86e786aa39ba1d6bea790b718a54fb9557c (diff) | |
download | perl-8fa44a45a6d052f95480fa59734072a7868b0512.tar.gz |
APItest/t/locale.t: Fix tests
This was misleadingly outputting an undef value, instead of just saying
it's undef
Diffstat (limited to 'ext')
-rw-r--r-- | ext/XS-APItest/t/locale.t | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/ext/XS-APItest/t/locale.t b/ext/XS-APItest/t/locale.t index 67830d021f..2827b3602a 100644 --- a/ext/XS-APItest/t/locale.t +++ b/ext/XS-APItest/t/locale.t @@ -138,9 +138,11 @@ SKIP: { is ($result, $correct, "Returns expected value" . "('$correct') for $formal_item"); } + elsif (defined $result) { + pass("Returns a value (in this case '$result') for $formal_item"); + } else { - ok (defined $result, - "Returns a value (in this case '$result') for $formal_item"); + fail("Returned undef for $formal_item"); } } } |