From: Fabian Keil <fk@fabiankeil.de>
Date: Fri, 30 Jun 2023 15:49:21 +0000 (+0200)
Subject: privoxy-regression-test.pl: Let the --min-level option increase the --max-level
X-Git-Tag: v_4_0_0~183
X-Git-Url: http://www.privoxy.org/gitweb/%22https:/static/user-manual/@proxy-info-url@?a=commitdiff_plain;h=36e809f26ad011e587a206e8349fcc2b52efd4b6;p=privoxy.git

privoxy-regression-test.pl: Let the --min-level option increase the --max-level

.. if the latter is smaller than the former.
---

diff --git a/tools/privoxy-regression-test.pl b/tools/privoxy-regression-test.pl
index 29eb9c18..5209bf8a 100755
--- a/tools/privoxy-regression-test.pl
+++ b/tools/privoxy-regression-test.pl
@@ -1779,6 +1779,11 @@ sub parse_cli_options() {
         'version'            => sub {print_version && exit(0)}
     ) or exit(1);
     $log_level |= $cli_options{'debug'};
+
+    if ($cli_options{'min-level'} > $cli_options{'max-level'}) {
+        log_message("Increasing --max-level to --min-level " . $cli_options{'min-level'});
+        $cli_options{'max-level'} = $cli_options{'min-level'};
+    }
 }
 
 sub cli_option_is_set($) {
@@ -2097,6 +2102,8 @@ a fuzzer.
 
 B<--min-level min-level> Only execute tests with a B<level>
 above or equal to the numerical B<min-level>.
+If the B<min-level> is larger than the B<max-level>,
+the B<max-level> is set to the B<min-level>.
 
 B<--privoxy-address proxy-address> Privoxy's listening address.
 If it's not set, the value of the environment variable http_proxy