diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-16 17:50:43 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-06-16 17:50:43 +0000 |
| commit | 63b097aac4bf2c02bfcc6ca595dd152a6cf7c747 (patch) | |
| tree | abecd8605166e156df72655482022509543015b8 /lib/Test | |
| parent | 7a3152049c3b11217c72b149c0293284b6993763 (diff) | |
| download | perl-63b097aac4bf2c02bfcc6ca595dd152a6cf7c747.tar.gz | |
Initialization is nice.
p4raw-id: //depot/perl@10635
Diffstat (limited to 'lib/Test')
| -rw-r--r-- | lib/Test/Harness.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Test/Harness.pm b/lib/Test/Harness.pm index 5444a406cf..8966ca6620 100644 --- a/lib/Test/Harness.pm +++ b/lib/Test/Harness.pm @@ -395,7 +395,7 @@ sub _run_all_tests { my @dir_files = _globdir $Files_In_Dir if defined $Files_In_Dir; my $t_start = new Benchmark; - my $maxlen; + my $maxlen = 0; foreach (@tests) { my $len = length; $maxlen = $len if $len > $maxlen; |