X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FConsole.pm;fp=perl%2FConsole.pm;h=052d1073a01ccf67f41d599ff0fc02449eecc06b;hb=0542c1871c9563b7577a4b9a1282fd5d2c203047;hp=453cf97db2a6e36824a8c4bce9fdc53da61e6f47;hpb=371caba1b5b241d10e9f68bfb2b866141f3ea84e;p=spider.git diff --git a/perl/Console.pm b/perl/Console.pm index 453cf97d..052d1073 100644 --- a/perl/Console.pm +++ b/perl/Console.pm @@ -30,7 +30,7 @@ if ($ENV{'TERM'} =~ /(xterm|ansi)/) { $foreground = COLOR_BLACK(); $background = COLOR_WHITE(); @colors = ( - [ '^DX de [\-A-Z0-9]+:\s+(14[45]\d\d\d|5[01]\d\d\d)', COLOR_PAIR(1) ], + [ '^DX de [\-A-Z0-9]+:\s+([57][01]\d\d\d\.|\d\d\d\d\d\d+.)', COLOR_PAIR(1) ], [ '^DX', COLOR_PAIR(5) ], [ '^To', COLOR_PAIR(3) ], [ '^WWV', COLOR_PAIR(4) ], @@ -44,7 +44,7 @@ if ($ENV{'TERM'} =~ /(console|linux)/) { $foreground = COLOR_WHITE(); $background = COLOR_BLACK(); @colors = ( - [ '^DX de [\-\w]+:\s+(14[45]\d\d\d|5[01]\d\d\d)', COLOR_PAIR(1) ], + [ '^DX de [\-A-Z0-9]+:\s+([57][01]\d\d\d\.|\d\d\d\d\d\d+.)', COLOR_PAIR(1) ], [ '^DX', COLOR_PAIR(4) ], [ '^To', COLOR_PAIR(3) ], [ '^WWV', COLOR_PAIR(5) ],