add "use warnings" everywhere
Karen Etheridge [Sun, 8 Sep 2013 18:05:49 +0000 (11:05 -0700)]
Makefile.PL
lib/Module/Metadata.pm
t/encoding.t
t/lib/DistGen.pm
t/lib/MBTest.pm
t/lib/Tie/CPHash.pm
t/metadata.t
t/version.t

index 6dc3efd..443bcee 100644 (file)
@@ -15,6 +15,7 @@ WriteMakefile(
     'File::Spec'  => 0,
     'IO::File'    => 0,
     'strict'      => 0,
+    'warnings'    => 0,
     'vars'        => 0,
     'version'     => 0.87,
     'warnings'    => 0,
index a9a81ef..29a5024 100644 (file)
@@ -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;
index a0970e0..b010f7e 100644 (file)
@@ -1,6 +1,7 @@
 #!perl
 
 use strict;
+use warnings;
 use File::Spec;
 use Test::More;
 
index 9fbd6d0..2353120 100644 (file)
@@ -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
index 005920f..fb239ab 100644 (file)
@@ -1,6 +1,7 @@
 package MBTest;
 
 use strict;
+use warnings;
 
 use IO::File ();
 use File::Spec;
index b167622..217d642 100644 (file)
@@ -20,6 +20,7 @@ package Tie::CPHash;
 
 require 5.000;
 use strict;
+use warnings;
 use vars qw(@ISA $VERSION);
 
 @ISA = qw();
index 286b1ae..20e6440 100644 (file)
@@ -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;
index 061a063..e523f97 100644 (file)
@@ -1,4 +1,5 @@
 use strict;
+use warnings;
 use Test::More;
 use Module::Metadata;
 use lib "t/lib/0_2";