Parent Directory | Revision Log | Patch
revision 100 by dpavlin, Mon May 25 22:11:20 2009 UTC | revision 165 by dpavlin, Sat Feb 20 16:32:01 2010 UTC | |
---|---|---|
# | Line 45 join("\n", map { | Line 45 join("\n", map { |
45 | my $node = $_; | my $node = $_; |
46 | my $speed = $graph->{$_}->{speed}; | my $speed = $graph->{$_}->{speed}; |
47 | my $c = 'ff0000'; | my $c = 'ff0000'; |
48 | $c = '00ff00' if ( $speed / 100 ) > 1; | $c = '00ff00' if ( $speed / 100 ) > 1.5; |
49 | $c = '0000ff' if ( $speed / 1000 ) > 1; | $c = '0000ff' if ( $speed / 1000 ) > 1; |
50 | $c = '8888ff' if ( $speed / 1000 ) > 2; | $c = '8888ff' if ( $speed / 1000 ) > 2; |
51 | my $label = $speed; | my $label = $speed; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |