httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestRun.pm
Date Fri, 19 Oct 2001 16:09:40 GMT
stas        01/10/19 09:09:40

  Modified:    perl-framework/Apache-Test/lib/Apache TestRun.pm
  Log:
  - don't lose unknown options (starting with --?), we want to abort the run
  if such are found.
  
  Revision  Changes    Path
  1.63      +4 -3      httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm
  
  Index: TestRun.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
  retrieving revision 1.62
  retrieving revision 1.63
  diff -u -r1.62 -r1.63
  --- TestRun.pm	2001/10/19 01:32:02	1.62
  +++ TestRun.pm	2001/10/19 16:09:39	1.63
  @@ -176,14 +176,15 @@
               # a known config option?
               if (exists $Apache::TestConfig::Usage{$key}) {
                   $conf_opts{$key} = shift @ARGV;
  +                next;
               } # a TestRequest config option?
               elsif (exists $req_wanted_args->{$key}) {
                   $req_args{$key} = shift @ARGV;
  +                next;
               }
           }
  -        else {
  -            push @argv, $val;
  -        }
  +        # to be processed later
  +        push @argv, $val;
       }
   
       $opts{req_args} = \%req_args;
  
  
  

Mime
View raw message