--- experimental/reports/graphing/graph.pl	2002/03/11 17:06:45	1.6
+++ experimental/reports/graphing/graph.pl	2002/03/13 20:50:48	1.7
@@ -7,7 +7,7 @@
 # Generates graphs from rrd databases for i-scream data.
 #
 # $Author: tdb $
-# $Id: graph.pl,v 1.6 2002/03/11 17:06:45 tdb Exp $
+# $Id: graph.pl,v 1.7 2002/03/13 20:50:48 tdb Exp $
 #------------------------------------------------------------
 
 ## TODO
@@ -202,6 +202,9 @@ sub makegraph() {
     RRDs::graph ("$imgdir/$machine/$type-1m.png", "--start=-2678400", @rrdcmd);
     my($err_1m) = RRDs::error;
     print STDERR "Error generating 1m graph for $machine/$type: $err_1m\n" if $err_1m;
+    RRDs::graph ("$imgdir/$machine/$type-1y.png", "--start=-31536000", @rrdcmd);
+    my($err_1y) = RRDs::error;
+    print STDERR "Error generating 1y graph for $machine/$type: $err_1y\n" if $err_1y;
     return;
 }