Change 11586 by jhi@alpha on 2001/08/05 19:26:50
Retract #10874 (the hack should be unnecessary by now)
Affected files ...
... //depot/perl/lib/Test/Harness.pm#52 edit
Differences ...
==== //depot/perl/lib/Test/Harness.pm#52 (text) ====
Index: perl/lib/Test/Harness.pm
--- perl/lib/Test/Harness.pm.~1~ Sun Aug 5 13:30:05 2001
+++ perl/lib/Test/Harness.pm Sun Aug 5 13:30:05 2001
@@ -575,8 +575,7 @@
my $bonusmsg = _bonusmsg($tot);
if ($tot->{bad} == 0 && $tot->{max}) {
-# print "All tests successful$bonusmsg.\n";
- print "All tests successful.\n";
+ print "All tests successful$bonusmsg.\n";
} elsif ($tot->{tests}==0){
die "FAILED--no tests were run for some reason.\n";
} elsif ($tot->{max} == 0) {
End of Patch.
