cvs commit: modperl-2.0/t .cvsignore SMOKE.PL TEST.PL

[stas]

stas        01/12/31 00:45:13

  Modified:    .        Makefile.PL
               t        .cvsignore
  Removed:     build    bugreport.pl
               t        SMOKE.PL TEST.PL
  Log:
  - start using the generate_script functions for auto-generating TEST,
  REPORT and SMOKE utils
  
  Revision  Changes    Path
  1.58      +11 -8     modperl-2.0/Makefile.PL
  
  Index: Makefile.PL
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
  retrieving revision 1.57
  retrieving revision 1.58
  diff -u -r1.57 -r1.58
  --- Makefile.PL       25 Dec 2001 12:46:10 -0000      1.57
  +++ Makefile.PL       31 Dec 2001 08:45:13 -0000      1.58
  @@ -3,16 +3,19 @@
   use warnings FATAL => 'all';
   
   use lib qw(lib Apache-Test/lib);
  -use Config;
  -use Apache::Build ();
  -use ModPerl::Code ();
  -use ModPerl::MM ();
   
  +use Config;
   use File::Spec::Functions;
   use DirHandle ();
   
  +use Apache::Build ();
  +use Apache::TestReportPerl ();
  +use Apache::TestSmokePerl ();
  +use Apache::TestRunPerl ();
   use Apache::TestTrace;
   use Apache::TestMM qw(test);
  +use ModPerl::Code ();
  +use ModPerl::MM ();
   
   our $VERSION;
   
  @@ -34,7 +37,6 @@
   my @remote_makefile_dirs = Apache::Build::is_win32() ? () :
                              qw(docs/api/mod_perl-2.0);
   
  -my @scripts = qw(t/TEST t/SMOKE);
   configure();
   
   ModPerl::MM::WriteMakefile(
  @@ -103,8 +105,9 @@
       #ModPerl::MM will use Apache::BuildConfig in subdir/Makefile.PL's
       $build->save;
   
  -    for (@scripts) {
  -        Apache::TestMM::generate_script($_);
  +    for my $util (qw(Report Smoke Run)) {
  +        my $class = "Apache::Test${util}Perl";
  +        $class->generate_script;
       }
   
       my $tables_dir = tables_dir($httpd_version);
  @@ -167,7 +170,7 @@
   sub clean_files {
       my $path = $code->path;
   
  -    return [@{ $build->clean_files }, @scripts,
  +    return [@{ $build->clean_files },
               <xs/*.exp>, <xs/*.def>,
         map { "$path/$_"} @{ $code->clean_files }];
   }
  
  
  
  1.4       +1 -0      modperl-2.0/t/.cvsignore
  
  Index: .cvsignore
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/t/.cvsignore,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- .cvsignore        10 Dec 2001 07:44:53 -0000      1.3
  +++ .cvsignore        31 Dec 2001 08:45:13 -0000      1.4
  @@ -1,5 +1,6 @@
   TEST
   SMOKE
  +REPORT
   .gdb-test-start
   htdocs
   logs