--- db2gantt.cgi	2002/09/15 19:17:37	1.17
+++ db2gantt.cgi	2002/09/15 19:29:38	1.19
@@ -8,7 +8,7 @@
 use CGI::Carp qw(fatalsToBrowser);
 use POSIX qw(strftime);
 
-my $debug = 1;
+my $debug = 0;
 
 my $width = 600;	# width of bar
 my $height = 19;	# height of bar
@@ -221,7 +221,7 @@
 	where (start < '$from' and finish > '$from') or
 	(start > '$from' and start < '$to')
 	order by device,specification,start
-	"
+	";
 
 my $sth = $dbh->prepare($sql) || die "sql: $sql ".$dbh->errstr;
 
@@ -286,10 +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};
+	$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;