From 37ebf115d6736276f94ecccb8954f4e02077093e Mon Sep 17 00:00:00 2001 From: Fabian Keil Date: Sat, 19 Feb 2011 13:59:40 +0000 Subject: [PATCH] In load_action_files(), don't check_for_forbidden_characters() if it has already been done through enlist_new_test() --- tools/privoxy-regression-test.pl | 11 ++++++++--- 1 file changed, 8 insertions(+), 3 deletions(-) diff --git a/tools/privoxy-regression-test.pl b/tools/privoxy-regression-test.pl index 66ec6366..77ad4e04 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.61 2010/01/03 13:49:01 fabiankeil Exp $ +# $Id: privoxy-regression-test.pl,v 1.62 2011/02/19 13:59:20 fabiankeil Exp $ # # Wish list: # @@ -371,6 +371,7 @@ sub load_action_files ($) { $ri++; $count++; enlist_new_test(\@regression_tests, $token, $value, $si, $ri, $count); + $no_checks = 1; # Already validated by enlist_new_test(). } if ($token =~ /level\s+(\d+)/i) { @@ -463,10 +464,14 @@ sub load_action_files ($) { # We don't use it, so we don't need $no_checks = 1; + l(LL_STATUS, "Enabling no_checks for $token") unless $no_checks; } + # XXX: Neccessary? - check_for_forbidden_characters($value) unless $no_checks; - check_for_forbidden_characters($token); + unless ($no_checks) { + check_for_forbidden_characters($value); + check_for_forbidden_characters($token); + } } } -- 2.39.2