--- db2gantt.cgi	2002/09/14 21:45:23	1.16
+++ db2gantt.cgi	2002/09/15 19:29:38	1.19
@@ -17,8 +17,8 @@
 # status colors
 my %cols = (
 	'In Progress' 		=> '0,255,0',
-	'In Progress/Failures'	=> '255,64,255',
-	'In Progress/Errors'	=> '255,64,0',
+	'In Progress/Failures'	=> '192,64,192',
+	'In Progress/Errors'	=> '255,128,128',
 	'Queuing'		=> '255,255,0',
 	'Aborted'		=> '255,0,0',
 	'Failed'		=> '255,0,0',
@@ -220,7 +220,7 @@
 	from gantt
 	where (start < '$from' and finish > '$from') or
 	(start > '$from' and start < '$to')
-	order by device,specification
+	order by device,specification,start
 	";
 
 my $sth = $dbh->prepare($sql) || die "sql: $sql ".$dbh->errstr;
@@ -286,9 +286,10 @@
 	my $alt = $row->{start}." - ".$row->{finish}."<br>";
 	$alt =~ s/:\d\d\.\d+//g;
 	$alt =~ s/\s+/&nbsp;/g;
-	$alt .= $row->{type}." <b>".$row->{status}."</b><br>".
-	$row->{user_group_host}." <i>".$row->{sessionid}."</i><br>".
-	$row->{device}."&nbsp;on&nbsp;".$row->{host};
+	$alt .= $row->{specification}."<br>".
+		$row->{type}." <b>".$row->{status}."</b><br>".
+		$row->{user_group_host}." <i>".$row->{sessionid}."</i><br>".
+		$row->{device}."&nbsp;on&nbsp;".$row->{host};
 	print bar($len,$row->{status},$alt);
 
 	$curr_t += $len;