Commit e42b8c24 authored by Matthieu Muffato's avatar Matthieu Muffato
Browse files

Disable the bright colours on older versions of Term::ANSIColor

parent e6e818f0
......@@ -308,6 +308,17 @@ my %meta_status_2_color = (
'FAILED' => 'red',
);
# "Support for colors 8 through 15 (the bright_ variants) was added in
# Term::ANSIColor 3.00, included in Perl 5.13.3."
# http://perldoc.perl.org/Term/ANSIColor.html#COMPATIBILITY
if ($Term::ANSIColor::VERSION < '3.00') {
foreach my $s (keys %meta_status_2_color) {
my $c = $meta_status_2_color{$s};
$c =~ s/bright_//;
$meta_status_2_color{$s} = $c;
}
}
my %analysis_status_2_meta_status = (
'LOADING' => 'READY',
'SYNCHING' => 'READY',
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment