diff options
author | Marius Halden <marius.h@lden.org> | 2015-02-13 11:58:57 +0100 |
---|---|---|
committer | Marius Halden <marius.h@lden.org> | 2015-02-13 11:58:57 +0100 |
commit | 9dfe9abad6592a8b09361c4ea572b220272fd7d6 (patch) | |
tree | 59773d43347b20898beb104e6cb701a27873db00 /stats.pl | |
parent | f950e1342d14548105ebd4059a45e624362de3ff (diff) | |
download | appdrift-stats-9dfe9abad6592a8b09361c4ea572b220272fd7d6.tar.gz appdrift-stats-9dfe9abad6592a8b09361c4ea572b220272fd7d6.tar.bz2 appdrift-stats-9dfe9abad6592a8b09361c4ea572b220272fd7d6.tar.xz |
Diffstat (limited to 'stats.pl')
-rwxr-xr-x | stats.pl | 8 |
1 files changed, 2 insertions, 6 deletions
@@ -70,8 +70,6 @@ for my $section (@content) { $time_maint = $1; } elsif ($line =~ /time_down: (.*)/i) { $time_down = $1; - } else { - print STDERR "Unkown line: \"$line\""; } } @@ -82,11 +80,9 @@ for my $section (@content) { $group_info->{'downtime'}->{$user} = $time_down; $group_info->{'maintenance'}->{$user} = $time_maint; $group_info->{'server'}->{$user} = $endpoint; - - push @group_names, $user; } -@group_names = sort @group_names; +@group_names = sort keys %{$group_info->{'rrd_groups'}}; $#group_colors = $#group_names; for my $group (@group_names) { @@ -258,7 +254,7 @@ my @usr_sources = $user_rrd->sources("$usr_rrd"); my @pst_sources = $user_rrd->sources("$pst_rrd"); my @cmt_sources = $comment_rrd->sources("$cmt_rrd"); -for my $group (keys %{$group_info->{'rrd_groups'}}) { +for my $group (@group_names) { $position_rrd->add_source("$pos_rrd", $group => $group_info->{'rrd_groups'}->{$group}) unless (in_array($group, \@pos_sources)); $balance_rrd->add_source("$bal_rrd", $group => $group_info->{'rrd_groups'}->{$group}) unless (in_array($group, \@bal_sources)); $uptime_rrd->add_source("$upt_rrd", $group => $group_info->{'rrd_groups'}->{$group}) unless (in_array($group, \@upt_sources)); |