cvs commit: modperl-2.0/ModPerl-Registry/t TEST.PL

2001-11-12 Thread stas 

stas01/11/12 20:35:26

  Modified:ModPerl-Registry/t TEST.PL
  Log:
  - enable testing with the live sources, and not blib
  
  Revision  ChangesPath
  1.3   +1 -0  modperl-2.0/ModPerl-Registry/t/TEST.PL
  
  Index: TEST.PL
  ===
  RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/TEST.PL,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- TEST.PL   2001/10/19 02:40:41 1.2
  +++ TEST.PL   2001/11/13 04:35:26 1.3
  @@ -3,6 +3,7 @@
   use strict;
   use warnings FATAL = 'all';
   
  +use lib ../lib; # test against the source lib for easier dev
   use lib map {(../blib/$_, ../../blib/$_)} qw(lib arch);
   
   use Apache::TestRunPerl ();

cvs commit: modperl-2.0/ModPerl-Registry/t TEST.PL

2001-10-18 Thread stas 

stas01/10/18 19:40:41

  Modified:ModPerl-Registry/t TEST.PL
  Log:
  - allow 2 maxclients, since some tests generate two requests at the same
  time (one from within the other)
  
  Revision  ChangesPath
  1.2   +15 -8 modperl-2.0/ModPerl-Registry/t/TEST.PL
  
  Index: TEST.PL
  ===
  RCS file: /home/cvs/modperl-2.0/ModPerl-Registry/t/TEST.PL,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- TEST.PL   2001/10/09 12:47:38 1.1
  +++ TEST.PL   2001/10/19 02:40:41 1.2
  @@ -3,15 +3,22 @@
   use strict;
   use warnings FATAL = 'all';
   
  -# XXX: fixme
  -#use lib map { $_/Apache-Test/lib } qw(. ..);
  -#use lib map { $_/blib/lib} qw(. .. ../..);
  -#use lib map { $_/lib } qw(. .. ../..);
  -#use blib map { $_ } qw(. .. ../..);
  -
   use lib map {(../blib/$_, ../../blib/$_)} qw(lib arch);
  -#use blib qw(..);
   
   use Apache::TestRunPerl ();
  +
  +package MyTest;
  +
  +our @ISA = qw(Apache::TestRunPerl);
  +
  +# subclass new_test_config to add some config vars which will be
  +# replaced in generated httpd.conf
  +sub new_test_config {
  +my $self = shift;
  +
  +$self-{conf_opts}-{maxclients} = 2;
  +
  +return $self-SUPER::new_test_config;
  +}
   
  -Apache::TestRunPerl-new-run(@ARGV);
  +MyTest-new-run(@ARGV);