diff options
Diffstat (limited to 't/011pod.t')
| -rw-r--r-- | t/011pod.t | 28 |
1 files changed, 18 insertions, 10 deletions
diff --git a/t/011pod.t b/t/011pod.t index 4f5fa87f7..517ca03ad 100644 --- a/t/011pod.t +++ b/t/011pod.t @@ -1,19 +1,27 @@ -# This Source Code Form is subject to the terms of the Mozilla Public -# License, v. 2.0. If a copy of the MPL was not distributed with this -# file, You can obtain one at http://mozilla.org/MPL/2.0/. -# -# This Source Code Form is "Incompatible With Secondary Licenses", as -# defined by the Mozilla Public License, v. 2.0. +# -*- Mode: perl; indent-tabs-mode: nil -*- +# +# The contents of this file are subject to the Mozilla Public +# License Version 1.1 (the "License"); you may not use this file +# except in compliance with the License. You may obtain a copy of +# the License at http://www.mozilla.org/MPL/ +# +# Software distributed under the License is distributed on an "AS +# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or +# implied. See the License for the specific language governing +# rights and limitations under the License. +# +# The Original Code are the Bugzilla Tests. +# +# Contributor(s): Frédéric Buclin <LpSolit@gmail.com> + ################## #Bugzilla Test 11# ##POD validation## -use 5.10.1; use strict; -use warnings; -use lib qw(. lib local/lib/perl5 t); +use lib 't'; use Support::Files; use Pod::Checker; @@ -24,7 +32,7 @@ use Test::More tests => scalar(@Support::Files::testitems); # This will handle verbosity for us automatically. my $fh; { - no warnings 'unopened'; + local $^W = 0; # Don't complain about non-existent filehandles if (-e \*Test::More::TESTOUT) { $fh = \*Test::More::TESTOUT; } elsif (-e \*Test::Builder::TESTOUT) { |