From 8d6e57668a3f9e68154644419a7b9fc5a20d97f5 Mon Sep 17 00:00:00 2001 From: Quentin Smith Date: Thu, 11 Aug 2011 01:41:45 -0400 Subject: [PATCH] Update Munin graphing scripts for new field names --- web/all-usage.cgi | 2 +- web/usage.cgi | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/web/all-usage.cgi b/web/all-usage.cgi index 20d5eb4..efc8a2c 100755 --- a/web/all-usage.cgi +++ b/web/all-usage.cgi @@ -46,7 +46,7 @@ my $type = $q->param("type") || "cpu"; $type =~ m|^(\w+)$| or die "Invalid graph type"; $type = $graph_types{$1} or die "Invalid graph type"; -my $path = catfile(GRAPH_DIR, "*-$type-????????_????_????_????_????????????-?.rrd"); +my $path = catfile(GRAPH_DIR, "*-$type-uuid_????????_????_????_????_????????????-?.rrd"); my @files = glob $path or die "No data found"; push @args, "--start", "-".$days."d"; diff --git a/web/usage.cgi b/web/usage.cgi index 5675e09..e815d78 100755 --- a/web/usage.cgi +++ b/web/usage.cgi @@ -50,7 +50,7 @@ my $type = $q->param("type") || "cpu"; $type =~ m|^(\w+)$| or die "Invalid graph type"; $type = $graph_types{$1} or die "Invalid graph type"; -my $path = catfile(GRAPH_DIR, "*-$type-$uuid-?.rrd"); +my $path = catfile(GRAPH_DIR, "*-$type-uuid_$uuid-?.rrd"); my @files = glob $path or die "No data found"; push @args, "--start", "-".$days."d"; -- 1.7.9.5