From: Karen Etheridge Date: Sun, 8 Sep 2013 18:05:49 +0000 (-0700) Subject: add "use warnings" everywhere X-Git-Tag: v1.000017~9 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FModule-Metadata.git;a=commitdiff_plain;h=eed8b6fa7cdf13d70c415b8a7f5a266aef08ab2d add "use warnings" everywhere --- diff --git a/Makefile.PL b/Makefile.PL index 6dc3efd..443bcee 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -15,6 +15,7 @@ WriteMakefile( 'File::Spec' => 0, 'IO::File' => 0, 'strict' => 0, + 'warnings' => 0, 'vars' => 0, 'version' => 0.87, 'warnings' => 0, diff --git a/lib/Module/Metadata.pm b/lib/Module/Metadata.pm index a9a81ef..29a5024 100644 --- a/lib/Module/Metadata.pm +++ b/lib/Module/Metadata.pm @@ -10,6 +10,8 @@ package Module::Metadata; # parrot future to look at other types of modules). use strict; +use warnings; + use vars qw($VERSION); $VERSION = '1.000016'; $VERSION = eval $VERSION; diff --git a/t/encoding.t b/t/encoding.t index a0970e0..b010f7e 100644 --- a/t/encoding.t +++ b/t/encoding.t @@ -1,6 +1,7 @@ #!perl use strict; +use warnings; use File::Spec; use Test::More; diff --git a/t/lib/DistGen.pm b/t/lib/DistGen.pm index 9fbd6d0..2353120 100644 --- a/t/lib/DistGen.pm +++ b/t/lib/DistGen.pm @@ -1,6 +1,7 @@ package DistGen; use strict; +use warnings; use vars qw( $VERSION $VERBOSE @EXPORT_OK); @@ -182,6 +183,7 @@ sub _gen_default_filedata { \$VERSION = '0.01'; use strict; + use warnings; 1; @@ -205,6 +207,7 @@ sub _gen_default_filedata { $self->$add_unless('t/basic.t', undent(<<" ---")); use Test::More tests => 1; use strict; + use warnings; use $self->{name}; ok 1; @@ -470,6 +473,7 @@ sub change_build_pl { $self->change_file( 'Build.PL', undent(<<" ---") ); use strict; + use warnings; use Module::Build; my \$b = Module::Build->new( # Some CPANPLUS::Dist::Build versions need to allow mismatches diff --git a/t/lib/MBTest.pm b/t/lib/MBTest.pm index 005920f..fb239ab 100644 --- a/t/lib/MBTest.pm +++ b/t/lib/MBTest.pm @@ -1,6 +1,7 @@ package MBTest; use strict; +use warnings; use IO::File (); use File::Spec; diff --git a/t/lib/Tie/CPHash.pm b/t/lib/Tie/CPHash.pm index b167622..217d642 100644 --- a/t/lib/Tie/CPHash.pm +++ b/t/lib/Tie/CPHash.pm @@ -20,6 +20,7 @@ package Tie::CPHash; require 5.000; use strict; +use warnings; use vars qw(@ISA $VERSION); @ISA = qw(); diff --git a/t/metadata.t b/t/metadata.t index 286b1ae..20e6440 100644 --- a/t/metadata.t +++ b/t/metadata.t @@ -3,6 +3,7 @@ # vim:ts=8:sw=2:et:sta:sts=2 use strict; +use warnings; use lib 't/lib'; use IO::File; use MBTest; diff --git a/t/version.t b/t/version.t index 061a063..e523f97 100644 --- a/t/version.t +++ b/t/version.t @@ -1,4 +1,5 @@ use strict; +use warnings; use Test::More; use Module::Metadata; use lib "t/lib/0_2";