diff --git a/bin/tests/b9tsummary.pl b/bin/tests/b9tsummary.pl
index 378f7898b3..00e9073f30 100755
--- a/bin/tests/b9tsummary.pl
+++ b/bin/tests/b9tsummary.pl
@@ -146,15 +146,6 @@ foreach $entry (@entries) {
$when = `date`;
chop $when;
-#printf("\n");
-#printf("
\n");
-#printf("bind9 status %s\n", $when);
-#printf("\n");
-#printf("\n");
-#printf("\n");
-#printf("\n");
-#printf("
\n");
-
printf("\n");
printf("\n");
printf("\n");
@@ -189,11 +180,6 @@ printf("\n");
printf("\n");
printf("\n");
-#printf("\n");
-#printf("\n");
-#printf("\n");
-#printf("\n");
-
close(DEBUG) if ($Debug);
#
@@ -245,20 +231,20 @@ sub doHost {
}
}
else {
- $tstatus = "not available (no journal)";
+ $tstatus = "none (no journal)";
$tcolor = "red";
}
}
else {
$bstatus = "broken";
- $tstatus = "not available (build status)";
+ $tstatus = "none (build status)";
$bcolor = "red";
$tcolor = "black";
}
}
else {
- $bstatus = "not available";
- $tstatus = "not available (build status)";
+ $bstatus = "none";
+ $tstatus = "none (build status)";
$bcolor = "red";
$tcolor = "black";
}
@@ -267,7 +253,7 @@ sub doHost {
printf("\t
\n");
printf("\t\t%s | \n", $hostid);
- if ($bstatus =~ /not available/) {
+ if ($bstatus =~ /none/) {
printf("\t\t%s | \n", $bstatus);
printf("\t\t  | \n");
}
@@ -279,7 +265,7 @@ sub doHost {
printf("%d/%d", $bcolor, $Nfbp, $Nobp);
printf("\n");
}
- if ($tstatus =~ /not available/) {
+ if ($tstatus =~ /none/) {
printf("\t\t%s | \n", $tcolor, $tstatus);
}
else {
@@ -449,8 +435,10 @@ sub testCheck {
open(XXX, "< $hostpath/$TestFile");
open(YYY, "> $B9HostPath/$hostid/$TestSummaryFile");
-# printf(YYY "\n\n");
-# printf(YYY "\n");
+
+ printf(YYY "\n");
+ printf(YYY "\n");
+ printf(YYY "\n");
while () {
next unless ($_ =~ /^(S|I|T|A|R|E):/);
@@ -534,7 +522,7 @@ sub testCheck {
}
}
close(XXX);
-# printf(YYY "\n\n");
+ printf(YYY "\n");
close(YYY);
if ($ntestsets == 0) {
@@ -554,14 +542,10 @@ sub wbpf {
local(@messageset, $message);
open(XXX, "> $B9HostPath/$hostid/$BuildProblemsFile");
-# printf(XXX "\n\n");
-# printf(XXX "\n");
-# printf("\n");
-# printf("\n");
-
- printf(XXX "bind9 %s build problems by filename\n", $hostid);
- printf(XXX "\n\n");
+ printf(XXX "\n");
+ printf(XXX "\n");
+ printf(XXX "\n");
foreach $prob (sort keys %buildprobs) {
@@ -581,8 +565,7 @@ sub wbpf {
$lastfilename = $filename;
}
-# printf(XXX "\n\n");
-# printf("\n");
+ printf(XXX "\n");
close(XXX);
}