summaryrefslogtreecommitdiff
path: root/lib/Pod/t/basic.t
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Pod/t/basic.t')
-rw-r--r--lib/Pod/t/basic.t4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Pod/t/basic.t b/lib/Pod/t/basic.t
index eb6db54f30..a61b4bf07f 100644
--- a/lib/Pod/t/basic.t
+++ b/lib/Pod/t/basic.t
@@ -98,9 +98,9 @@ for (sort keys %translators) {
close MASTER;
close OUTPUT;
- # EBCDIC platforms use a different character for ESC
+ # OS/390 is EBCDIC, which uses a different character for ESC
# apparently. Try to convert so that the test still works.
- if (ord('A') eq 193 && $_ eq 'Pod::Text::Termcap') {
+ if ($^O eq 'os390' && $_ eq 'Pod::Text::Termcap') {
$output =~ tr/\033/\047/;
}