t/TEST ./t/foo.t

[Tatsuhiko Miyagawa <mi...@edge.co.jp>]

I guess this has once discussed, but my hand is accustomed to:

  perl -Mblib ./t/foo.t

So, what I want is './t/foo.t' instead of 't/foo.t'. Dirty patch:


--- Apache-Test/lib/Apache/TestRun.pm   2001/11/11 21:10:37     1.67
+++ Apache-Test/lib/Apache/TestRun.pm   2001/11/13 18:37:05
@@ -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 =~ s@^(?:\./)?t/@@;
         my $t_dir = catfile qw(.. t);
         my $file = catfile $t_dir, $arg;


--
Tatsuhiko Miyagawa <mi...@bulknews.net>

Re: t/TEST ./t/foo.t

[Doug MacEachern <do...@covalent.net>]

On Wed, 14 Nov 2001, Tatsuhiko Miyagawa wrote:

> I guess this has once discussed, but my hand is accustomed to:
> 
>   perl -Mblib ./t/foo.t
> 
> So, what I want is './t/foo.t' instead of 't/foo.t'. Dirty patch:

thanks, applied to cvs.