266 			my $failuresbyseverity = 0;

   266 			my $failuresbyseverity = 0;

   267 			$failuresbyseverity = $recipe_failures_num_by_severity->{$package}->{$_} if (defined $recipe_failures_num_by_severity->{$package}->{$_});

   267 			$failuresbyseverity = $recipe_failures_num_by_severity->{$package}->{$_} if (defined $recipe_failures_num_by_severity->{$package}->{$_});

   268 			$packageline .= "<td>$failuresbyseverity</td>";

   268 			$packageline .= "<td>$failuresbyseverity</td>";

   269 		}

   269 		}

   270 		$packageline .= "<td>".$missing_by_package->{$package}."</td>" if ($missing);

   270 		$packageline .= "<td>".$missing_by_package->{$package}."</td>" if ($missing);

   272 		print AGGREGATED "$packageline\n";

   272 		print AGGREGATED "$packageline\n";

   273 	}

   273 	}

   274 	else

   274 	else

   275 	{

   275 	{

   276 		my $packageline = "<tr><td>$package</td>";

   276 		my $packageline = "<tr><td>$package</td>";

   277 		for (@severities) { $packageline .= "<td>0</td>"; }

   277 		for (@severities) { $packageline .= "<td>0</td>"; }

   279 		print AGGREGATED "$packageline\n";

   280 		print AGGREGATED "$packageline\n";

   280 	}

   281 	}

   281 }

   282 }

   282 print AGGREGATED "</table>\n";

   283 print AGGREGATED "</table>\n";

   283 close(AGGREGATED);

   284 close(AGGREGATED);

   424 sub translate_detail_files_to_html

   425 sub translate_detail_files_to_html

   425 {

   426 {

   426 	opendir(DIR, $raptorbitsdir);

   427 	opendir(DIR, $raptorbitsdir);

   427 	my @failurefiles = readdir(DIR);

   428 	my @failurefiles = readdir(DIR);

   428 	closedir(DIR);	

   429 	closedir(DIR);	

   430 	

   431 	

   431 	for my $file (@failurefiles)

   432 	for my $file (@failurefiles)

   432 	{

   433 	{

   433 		$file =~ /(.*)\.txt$/;

   434 		$file =~ /(.*)\.txt$/;

   434 		my $filenamebase = $1;

   435 		my $filenamebase = $1;