Index: trunk/ippMonitor/czartool/czarpoll.pl
===================================================================
--- trunk/ippMonitor/czartool/czarpoll.pl	(revision 33814)
+++ trunk/ippMonitor/czartool/czarpoll.pl	(revision 34249)
@@ -30,20 +30,20 @@
 
 my $config = new czartool::Config();
-my $czarDb = $config->getCzarDbInstance(); 
+my $czarDb = $config->getCzarDbInstance();
 my $gpc1Db = $config->getGpc1Instance;
 my $nebulous = new czartool::Nebulous($czarDb);
 my $pantasks = new czartool::Pantasks();
-my $plotter = czartool::Plotter->new_file($config, $config->getGnuplotPath(), $save_temps); 
+my $plotter = czartool::Plotter->new_file($config, $config->getGnuplotPath(), $save_temps);
 
 
 my @stages = (
-        "chip", 
-        "cam", 
-        "fake", 
-        "warp", 
-        "stack", 
-        "staticsky", 
-        "diff", 
-        "dist", 
+        "chip",
+        "cam",
+        "fake",
+        "warp",
+        "stack",
+        "staticsky",
+        "diff",
+        "dist",
         "pub",
         "chipbackground");
@@ -65,5 +65,5 @@
 ###########################################################################
 #
-# Updates the dates from pantasks for all interested servers 
+# Updates the dates from pantasks for all interested servers
 #
 ###########################################################################
@@ -78,5 +78,5 @@
 
         my @dates = @{$pantasks->getDates($server)};
-        if (@dates) { 
+        if (@dates) {
 
             $czarDb->updateServerDates($server, \@dates);
@@ -91,5 +91,5 @@
 ###########################################################################
 #
-# Updates the labels from pantasks for all interested servers 
+# Updates the labels from pantasks for all interested servers
 #
 ###########################################################################
@@ -103,5 +103,5 @@
 
         my @labels = @{$pantasks->getLabels($server)};
-        if (@labels) { 
+        if (@labels) {
 
             $czarDb->updateCurrentLabels($server, \@labels);
@@ -116,5 +116,5 @@
 ###########################################################################
 #
-# Updates pantasks server status TODO should really get info for all servers at once 
+# Updates pantasks server status TODO should really get info for all servers at once
 #
 ###########################################################################
@@ -136,5 +136,5 @@
 ###########################################################################
 #
-# Polls with provided period (seconds) 
+# Polls with provided period (seconds)
 #
 ###########################################################################
@@ -184,9 +184,9 @@
                 # create metrics for last 24 hours
                 print "* Creating metrics for last 24 hours\n";
-                my $dayMetrics = new czartool::DayMetrics($config, 1, 0, $today); 
+                my $dayMetrics = new czartool::DayMetrics($config, 1, 0, $today);
                 $dayMetrics->writeHTML();
 
                 # now update metrics index page
-                my $metricsIndex = new czartool::MetricsIndex($config, 1, 0); 
+                my $metricsIndex = new czartool::MetricsIndex($config, 1, 0);
                 $metricsIndex->writeHTML();
 
@@ -210,4 +210,5 @@
         $plotter->plotStorageTimeSeries($czarDb->subtractInterval($begin, "1 WEEK") , $end);
         $plotter->plotDiskUsageHistogram();
+        $plotter->plotDiskUsageHistogramLarge();
         updateServerStatus();
 
@@ -269,10 +270,10 @@
     $czarDb->getCurrentIppToPspsLabels($begin, $end, \$ippToPspsLabels);
     $plotter->setIppToPspsMode();
-    
+
     # create ippToPsps labels
     foreach $stage (@ippToPspsStages) {
         foreach $row ( @{$ippToPspsLabels} ) {
             my ($label) = @{$row};
-            
+
             chomp($label);
             $plotter->createTimeSeries($label, $stage, $begin, $end, 1, 0, 1);