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

[jorton]

jorton      2004/02/27 03:17:40

  Modified:    perl-framework/Apache-Test/lib/Apache TestHarness.pm
  Log:
  Fix -Mlib path when running all.t with a little help from Stas.
  
  Revision  Changes    Path
  1.16      +2 -1      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestHarness.pm
  
  Index: TestHarness.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestHarness.pm,v
  retrieving revision 1.15
  retrieving revision 1.16
  diff -w -d -u -r1.15 -r1.16
  --- TestHarness.pm    23 Feb 2004 20:37:39 -0000      1.15
  +++ TestHarness.pm    27 Feb 2004 11:17:40 -0000      1.16
  @@ -49,7 +49,8 @@
   sub run_t {
       my($self, $file) = @_;
       my $ran = 0;
  -    my $cmd = "$^X -Mlib=../Apache-Test/lib $file";
  +    my $lib = catfile Apache::Test::vars('top_dir'), qw(Apache-Test lib);
  +    my $cmd = "$^X -Mlib=$lib $file";
   
       my $h = Symbol::gensym();
       open $h, "$cmd|" or die "open $cmd: $!";