cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestMB.pm

[stas]

stas        2004/07/06 00:56:12

  Modified:    perl-framework/Apache-Test/lib/Apache TestMB.pm
  Log:
  use generate_script sub name
  Submitted by: David Wheeler
  
  Revision  Changes    Path
  1.3       +2 -2      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestMB.pm
  
  Index: TestMB.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestMB.pm,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -u -r1.2 -r1.3
  --- TestMB.pm 24 Jun 2004 13:23:06 -0000      1.2
  +++ TestMB.pm 6 Jul 2004 07:56:12 -0000       1.3
  @@ -15,7 +15,7 @@
       my $self = $pkg->SUPER::new(@_);
       $self->{properties}{apache_test_args} = $vars;
       $self->{properties}{apache_test_script} ||= 't/TEST';
  -    $self->generate_test_script;
  +    $self->generate_script;
       return $self;
   }
   
  @@ -92,7 +92,7 @@
   sub ACTION_cmodules_clean { shift->_cmodues('clean') }
   
   # XXX I'd love to make this optional.
  -sub generate_test_script {
  +sub generate_script {
       my $self = shift;
   
       # If a file name has been passed in, use it. Otherwise, use the