00dani/stow
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Avoid "Use of uninitialized value" warnings from test suite.

Browse source 
Happened on some versions of Perl when TEST_VERBOSE not yet.
Thanks Adam Sampson!
This commit is contained in:
Adam Spiers 2012-01-13 11:34:55 +00:00
parent 25b9ce0f21
commit fe18b6c442
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
lib/Stow.pm.in
View file

@ -142,6 +142,7 @@ sub get_verbosity {
return $self->{verbose} unless $self->{test_mode}; return $self->{verbose} unless $self->{test_mode};
return 0 unless exists $ENV{TEST_VERBOSE};
return 0 unless length $ENV{TEST_VERBOSE}; return 0 unless length $ENV{TEST_VERBOSE};
# Convert TEST_VERBOSE=y into numeric value # Convert TEST_VERBOSE=y into numeric value