diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-08-01 13:38:29 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-08-01 13:38:29 +0000 |
| commit | 0ab780528073f06895a2098a912e0618adb3b12e (patch) | |
| tree | 38e865c39f558e9bb4f2f180d47907f5f293e45b /t/run | |
| parent | 55a9fe1dc168272ed2d7a5bbb3227f1cd3d043ab (diff) | |
| download | perl-0ab780528073f06895a2098a912e0618adb3b12e.tar.gz | |
Need to know the number of tests.
p4raw-id: //depot/perl@11533
Diffstat (limited to 't/run')
| -rw-r--r-- | t/run/exit.t | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/t/run/exit.t b/t/run/exit.t index 7b91cf3c1b..d9fe8b4b4a 100644 --- a/t/run/exit.t +++ b/t/run/exit.t @@ -18,10 +18,11 @@ sub run { return system($cmd.$quote.$code.$quote); } -## can't use this in 'use Test::More' yet -##my $numtests = ($^O eq 'VMS') ? 7 : 3; +BEGIN { + $numtests = ($^O eq 'VMS') ? 7 : 3; +} -use Test::More tests => 'no_plan'; +use Test::More tests => $numtests; my $exit, $exit_arg; |