1 files changed, 0 insertions, 145 deletions
diff --git a/chromium/third_party/cygwin/lib/perl5/5.10/TAP/Formatter/Color.pm b/chromium/third_party/cygwin/lib/perl5/5.10/TAP/Formatter/Color.pm
deleted file mode 100644
index a1fbf1cbadb..00000000000
--- a/chromium/third_party/cygwin/lib/perl5/5.10/TAP/Formatter/Color.pm
+++ /dev/null
@@ -1,145 +0,0 @@
-package TAP::Formatter::Color;
-
-use strict;
-
-use vars qw($VERSION);
-
-use constant IS_WIN32 => ( $^O =~ /^(MS)?Win32$/ );
-
-my $NO_COLOR;
-
-BEGIN {
-    $NO_COLOR = 0;
-
-    if (IS_WIN32) {
-        eval 'use Win32::Console';
-        if ($@) {
-            $NO_COLOR = $@;
-        }
-        else {
-            my $console = Win32::Console->new( STD_OUTPUT_HANDLE() );
-
-            # eval here because we might not know about these variables
-            my $fg = eval '$FG_LIGHTGRAY';
-            my $bg = eval '$BG_BLACK';
-
-            *set_color = sub {
-                my ( $self, $output, $color ) = @_;
-
-                my $var;
-                if ( $color eq 'reset' ) {
-                    $fg = eval '$FG_LIGHTGRAY';
-                    $bg = eval '$BG_BLACK';
-                }
-                elsif ( $color =~ /^on_(.+)$/ ) {
-                    $bg = eval '$BG_' . uc($1);
-                }
-                else {
-                    $fg = eval '$FG_' . uc($color);
-                }
-
-                # In case of colors that aren't defined
-                $self->set_color('reset')
-                  unless defined $bg && defined $fg;
-
-                $console->Attr( $bg | $fg );
-            };
-        }
-    }
-    else {
-        eval 'use Term::ANSIColor';
-        if ($@) {
-            $NO_COLOR = $@;
-        }
-        else {
-            *set_color = sub {
-                my ( $self, $output, $color ) = @_;
-                $output->( color($color) );
-            };
-        }
-    }
-
-    if ($NO_COLOR) {
-        *set_color = sub { };
-    }
-}
-
-=head1 NAME
-
-TAP::Formatter::Color - Run Perl test scripts with color
-
-=head1 VERSION
-
-Version 3.10
-
-=cut
-
-$VERSION = '3.10';
-
-=head1 DESCRIPTION
-
-Note that this harness is I<experimental>.  You may not like the colors I've
-chosen and I haven't yet provided an easy way to override them.
-
-This test harness is the same as L<TAP::Harness>, but test results are output
-in color.  Passing tests are printed in green.  Failing tests are in red.
-Skipped tests are blue on a white background and TODO tests are printed in
-white.
-
-If L<Term::ANSIColor> cannot be found (or L<Win32::Console> if running
-under Windows) tests will be run without color.
-
-=head1 SYNOPSIS
-
- use TAP::Formatter::Color;
- my $harness = TAP::Formatter::Color->new( \%args );
- $harness->runtests(@tests);
-
-=head1 METHODS
-
-=head2 Class Methods
-
-=head3 C<new>
-
-The constructor returns a new C<TAP::Formatter::Color> object. If
-L<Term::ANSIColor> is not installed, returns undef.
-
-=cut
-
-sub new {
-    my $class = shift;
-
-    if ($NO_COLOR) {
-
-        # shorten that message a bit
-        ( my $error = $NO_COLOR ) =~ s/ in \@INC .*//s;
-        warn "Note: Cannot run tests in color: $error\n";
-        return;
-    }
-
-    return bless {}, $class;
-}
-
-##############################################################################
-
-=head3 C<can_color>
-
-  Test::Formatter::Color->can_color()
-
-Returns a boolean indicating whether or not this module can actually
-generate colored output. This will be false if it could not load the
-modules needed for the current platform.
-
-=cut
-
-sub can_color {
-    return !$NO_COLOR;
-}
-
-=head3 C<set_color>
-
-Set the output color.
-
-=cut
-
-1;