Change 14448 by jhi@alpha on 2002/01/27 18:48:17
(Russ Allbery) OS/390 is using a high-bit character for ESC,
skip the test for now. A better fix would be to override
the notion of the platform's escape sequence in the test
of Pod::Text::Termcap. We may have to apply a filter to
the output to substitute back in the ESC character that
the test expects, but only on OS/390.
Affected files ...
.... //depot/perl/lib/Pod/t/basic.t#7 edit
Differences ...
==== //depot/perl/lib/Pod/t/basic.t#7 (text) ====
Index: perl/lib/Pod/t/basic.t
--- perl/lib/Pod/t/basic.t.~1~ Sun Jan 27 12:00:05 2002
+++ perl/lib/Pod/t/basic.t Sun Jan 27 12:00:05 2002
@@ -101,6 +101,8 @@
if ($master eq $output) {
print "ok $n\n";
unlink "out.$translators{$_}";
+ } elsif ($^O eq 'os390' && $translators{$_} eq 'cap') {
+ print "ok $n # Skip: $^O is using a high-bit character for ESC\n";
} else {
my @master = split m/[\r\n]+/, $master;
my @output = split m/[\r\n]+/, $output;
End of Patch.