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.

Reply via email to