Retract #14448, a better patch coming up.
Jarkko Hietaniemi [Mon, 28 Jan 2002 01:36:28 +0000 (01:36 +0000)]
p4raw-id: //depot/perl@14458

lib/Pod/t/basic.t

index 5e22bea..475df26 100644 (file)
@@ -101,8 +101,6 @@ for (sort keys %translators) {
         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;