X-Git-Url: http://www.privoxy.org/gitweb/?a=blobdiff_plain;f=tools%2Fprivoxy-regression-test.pl;h=a083ff0c8a3460fb98de29e2805eb42e9df37d7d;hb=69496e59aa2b0c7a01c703d3cf35a306e8913624;hp=ec071722dc01332ac587f80d78a9119ee2ff56c7;hpb=6dcb54594ccfd856725d88b60ed28adf4e417902;p=privoxy.git diff --git a/tools/privoxy-regression-test.pl b/tools/privoxy-regression-test.pl index ec071722..a083ff0c 100755 --- a/tools/privoxy-regression-test.pl +++ b/tools/privoxy-regression-test.pl @@ -7,7 +7,7 @@ # A regression test "framework" for Privoxy. For documentation see: # perldoc privoxy-regression-test.pl # -# $Id: privoxy-regression-test.pl,v 1.89 2013/02/05 14:02:43 fabiankeil Exp $ +# $Id: privoxy-regression-test.pl,v 1.92 2013/03/20 11:30:45 fabiankeil Exp $ # # Wish list: # @@ -491,8 +491,7 @@ sub mark_matching_tests_for_skipping($) { my $message = sprintf("Marking test %s for ignoring. Overwrite condition: %s.", $regression_tests[$s][$r]{'number'}, $overwrite_condition); - # XXX: Should eventually be downgraded to LL_FILE_LOADING. - log_message($message); + l(LL_FILE_LOADING, $message); # XXX: Should eventually get its own key so get_skip_reason() # can tell about the overwrite condition. @@ -717,12 +716,12 @@ sub execute_regression_tests () { # from different sections isn't possible. # Is this worth changing the layout? fisher_yates_shuffle(\@regression_tests); - for (my $s = 0; $s < @regression_tests; $s++) { + for (my $s = 0; $s < @regression_tests; $s++) { fisher_yates_shuffle($regression_tests[$s]); } } - for (my $s = 0; $s < @regression_tests; $s++) { + for (my $s = 0; $s < @regression_tests; $s++) { my $r = 0; @@ -1554,7 +1553,7 @@ sub log_result ($$) { $test->{'number'}); if (cli_option_is_set('verbose')) { - $message = sprintf(" (%d/%d/%d)", $number, + $message .= sprintf(" (%d/%d/%d)", $number, $test->{'section-id'}, $test->{'regression-test-id'}); }