diff options
| author | Frédéric Buclin <LpSolit@gmail.com> | 2014-08-13 12:43:11 +0200 |
|---|---|---|
| committer | Frédéric Buclin <LpSolit@gmail.com> | 2014-08-13 12:43:11 +0200 |
| commit | 9f3d18d43e3fe4e6987fb4dd09a8760560372dbf (patch) | |
| tree | bf64b06312ad9d2a4f590c414ecc28c4f8e20054 /t/003safesys.t | |
| parent | c19dc4ffe98074bedb780652af581a1f0edb3b2d (diff) | |
| download | bugzilla-9f3d18d43e3fe4e6987fb4dd09a8760560372dbf.tar.gz bugzilla-9f3d18d43e3fe4e6987fb4dd09a8760560372dbf.tar.xz | |
Bug 996893: Perl 5.18 and newer throw tons of warnings about deprecated modules
r=dkl a=sgreen
Diffstat (limited to 't/003safesys.t')
| -rw-r--r-- | t/003safesys.t | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/t/003safesys.t b/t/003safesys.t index 0d6a215b1..2a257ffb9 100644 --- a/t/003safesys.t +++ b/t/003safesys.t @@ -10,7 +10,9 @@ #Bugzilla Test 3# ###Safesystem#### +use 5.10.1; use strict; +use warnings; use lib 't'; @@ -22,7 +24,7 @@ use Test::More tests => scalar(@Support::Files::testitems); # This will handle verbosity for us automatically. my $fh; { - local $^W = 0; # Don't complain about non-existent filehandles + no warnings qw(unopened); # Don't complain about non-existent filehandles if (-e \*Test::More::TESTOUT) { $fh = \*Test::More::TESTOUT; } elsif (-e \*Test::Builder::TESTOUT) { |