--- db2gantt.cgi	2002/09/13 14:03:47	1.8
+++ db2gantt.cgi	2002/09/13 14:34:02	1.9
@@ -25,6 +25,7 @@
 	'Completed/Errors'	=> '255,128,0',
 	'Completed/Failure'	=> '128,0,128',
 	'Mount Request'		=> '128,128,255',
+	'Mount/Errors'		=> '255,64,128',
 	);
 
 my $int_t = (12 * 60 * 60);	# interval to display on one screen
@@ -34,14 +35,21 @@
 
 # time range
 
+$int_t = m_round($int_t);
+
 my ($from_t,$to_t) = (time()-$int_t,time());
 
 $to_t = param('to_t') if (param('to_t'));
 $from_t = param('from_t') if (param('from_t'));
 
 # round to nearest minute
-$to_t = $to_t - ($to_t % 60);
-$from_t = $from_t - ($from_t % 60) + 60;
+sub m_round {
+	my $t = shift @_;
+	return ($t - ($t % 60));
+}
+
+$to_t = m_round($to_t);
+$from_t = m_round($from_t);
 
 my $to=strftime("%Y-%m-%d %H:%M",localtime ($to_t));
 my $from=strftime("%Y-%m-%d %H:%M",localtime ($from_t));
@@ -191,10 +199,10 @@
 
 	}
 
-	my $start_t = str2time($row->{start});
-	my $fin_t = str2time($row->{finish});
+	my $start_t = m_round(str2time($row->{start}));
+	my $fin_t = m_round(str2time($row->{finish}));
 
-	if ($start_t > $curr_t) {
+	if ($start_t > $curr_t + 60) {
 		my $t = $start_t - $curr_t;
 		print STDERR "[middle filler $curr_t:$t]" if ($debug);
 		print bar($t);