From e9aa4a135cc97da2edb7eed3ca0b1f7c5dbe07bb Mon Sep 17 00:00:00 2001 From: Jason Etheridge Date: Thu, 10 Oct 2013 19:41:26 -0400 Subject: [PATCH] poor man method of making exceptions for errors Signed-off-by: Jason Etheridge --- qa/test_output_webifier.pl | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/qa/test_output_webifier.pl b/qa/test_output_webifier.pl index 6a38254db..47e66b9bf 100755 --- a/qa/test_output_webifier.pl +++ b/qa/test_output_webifier.pl @@ -29,9 +29,10 @@ while (my $line = <>) { $evergreen_tip = $1; } if ($line =~ /_\.-~= (.*)$/) { + $prev_subpage = $subpage; $subpage = $1; $state = 'outputting'; - print_pass_or_fail(); + print_pass_or_fail($prev_subpage); $error_count = 0; $subpage_count++; print MAIN_PAGE qq^\n
  • $subpage^; @@ -134,7 +135,11 @@ sub html_footer { } sub print_pass_or_fail { - if ($error_count) { + my $subpage = shift; + my $exception = {}; # keyed on subpage, value = # of expected errors + $exception{'Installing Evergreen pre-requisites'} = 3; + #print "subpage = <$subpage> error_count = $error_count\n"; + if ($error_count && $error_count > $exception{$subpage} ) { print MAIN_PAGE ' - Failed'; print PASS_FAIL "Failed\n"; } else { -- 2.43.2