cvs commit: modperl-2.0/lib/Apache Build.pm

[dougm]

dougm       00/04/21 00:13:57

  Modified:    lib/Apache Build.pm
  Log:
  do the right thing for @ARGV
  
  Revision  Changes    Path
  1.9       +4 -1      modperl-2.0/lib/Apache/Build.pm
  
  Index: Build.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/Apache/Build.pm,v
  retrieving revision 1.8
  retrieving revision 1.9
  diff -u -r1.8 -r1.9
  --- Build.pm  2000/04/21 07:12:41     1.8
  +++ Build.pm  2000/04/21 07:13:57     1.9
  @@ -200,6 +200,9 @@
               $self->{$key} = $val;
               print "   $key = $val\n";
        }
  +        else {
  +            push @ARGV, $_;
  +        }
       }
       close $fh;
   }
  @@ -280,8 +283,8 @@
           @_,
       }, $class;
   
  -    $self->parse_argv;
       $self->parse_init_file;
  +    $self->parse_argv;
   
       if ($self->{MP_DEBUG} and $self->{MP_USE_GTOP}) {
           $self->{MP_USE_GTOP} = 0 unless $self->find_dlfile('gtop');