Avoid "Use of uninitialized value" warnings from test suite.
Happened on some versions of Perl when TEST_VERBOSE not yet. Thanks Adam Sampson!
This commit is contained in:
parent
25b9ce0f21
commit
fe18b6c442
1 changed files with 1 additions and 0 deletions
|
@ -142,6 +142,7 @@ sub get_verbosity {
|
|||
|
||||
return $self->{verbose} unless $self->{test_mode};
|
||||
|
||||
return 0 unless exists $ENV{TEST_VERBOSE};
|
||||
return 0 unless length $ENV{TEST_VERBOSE};
|
||||
|
||||
# Convert TEST_VERBOSE=y into numeric value
|
||||
|
|
Loading…
Reference in a new issue