Skip to content

Commit 9eda615

Browse files
committed
fixes
1 parent a0873f5 commit 9eda615

File tree

1 file changed

+11
-4
lines changed

1 file changed

+11
-4
lines changed

common/prettify.pm

Lines changed: 11 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1109,6 +1109,10 @@ sub new ($$$$$$$$)
11091109
$self->{LAST_DESCRIPTION} = '';
11101110
$self->{FAILED_TESTS} = $failed_tests_ref;
11111111
$self->{FAILED_TESTS_ONLY} = $failed_tests_only;
1112+
1113+
if ($failed_tests_only) {
1114+
$self->{TOTALS} = new Prettify::Totals_HTML ($basename);
1115+
}
11121116

11131117
if (!$failed_tests_only) {
11141118
# Initialize the hash table of handlers for each section
@@ -1143,6 +1147,7 @@ sub new ($$$$$$$$)
11431147
(
11441148
'begin' => \&Normal_Handler,
11451149
'setup' => \&Setup_Handler,
1150+
'config' => \&Config_Handler,
11461151
'test' => \&Test_Handler,
11471152
);
11481153

@@ -1364,7 +1369,7 @@ sub Setup_Handler ($)
13641369
return;
13651370
}
13661371

1367-
my $totals= (@{$self->{OUTPUT}})[2];
1372+
my $totals= $self->{FAILED_TESTS_ONLY} ? $self->{TOTALS} : (@{$self->{OUTPUT}})[2];
13681373

13691374
if ($s =~ m/Executing: (?:.*\/)?cvs(?:.exe)? /i) ## Prismtech still use some CVS please leave
13701375
{
@@ -1570,10 +1575,12 @@ sub Config_Handler ($)
15701575
my $state = $self->{STATE};
15711576

15721577
# We only want to output config stuff to the Config_HTML class (and FULL)
1573-
$outputs[0]->Normal($s, $state);
1574-
$outputs[3]->Normal($s, $state);
1578+
if (!$self->{FAILED_TESTS_ONLY}){
1579+
$outputs[0]->Normal($s, $state);
1580+
$outputs[3]->Normal($s, $state);
1581+
}
15751582

1576-
my $totals= (@{$self->{OUTPUT}})[2];
1583+
my $totals= $self->{FAILED_TESTS_ONLY} ? $self->{TOTALS} : (@{$self->{OUTPUT}})[2];
15771584

15781585
if ($s =~ m/SVN_REVISION(_(\d))?=(\d+)/)
15791586
{

0 commit comments

Comments
 (0)