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

[dougm]

dougm       01/11/13 13:05:44

  Modified:    perl-framework/Apache-Test/lib/Apache TestRun.pm
  Log:
  treat 't/TEST ./t/foo.t' same as 't/TEST t/foo.t'
  Submitted by:    Tatsuhiko Miyagawa <[EMAIL PROTECTED]>
  Reviewed by:   dougm
  
  Revision  Changes    Path
  1.68      +1 -1      
httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm
  
  Index: TestRun.pm
  ===================================================================
  RCS file: 
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
  retrieving revision 1.67
  retrieving revision 1.68
  diff -u -r1.67 -r1.68
  --- TestRun.pm        2001/11/11 21:10:37     1.67
  +++ TestRun.pm        2001/11/13 21:05:44     1.68
  @@ -85,7 +85,7 @@
       for (@$argv) {
           my $arg = $_;
           #need the t/ for stat-ing, but dont want to include it in test output
  -        $arg =~ s:^t/::;
  +        $arg =~ [EMAIL PROTECTED](?:\./)?t/@@;
           my $t_dir = catfile qw(.. t);
           my $file = catfile $t_dir, $arg;