standardize on strictures+autodie+Test::Most where applicable
Chris Nehren [Sun, 4 Sep 2011 07:28:42 +0000 (03:28 -0400)]
16 files changed:
lib/App/Promulger.pm
lib/App/Promulger/Command.pm
lib/App/Promulger/Command/members.pm
lib/App/Promulger/Command/msg.pm
lib/App/Promulger/Command/newlist.pm
lib/App/Promulger/Command/newsub.pm
lib/App/Promulger/Command/rmlist.pm
lib/App/Promulger/Command/rmsub.pm
lib/Promulger.pm
lib/Promulger/Config.pm
lib/Promulger/List.pm
script/make_message
script/mm2pmg
script/pmg
t/00compile.t
t/list.t

index 1cce07d..b6be419 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Cmd::Setup -app;
 
index 1c699c6..9d377de 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Cmd::Setup -command;
 
index 3499540..bd19cb1 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command::members;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger -command;
 use Promulger::List;
index 28a2131..275047e 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command::msg;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger -command;
 use parent 'App::Promulger::Command';
index 2b79775..d05a38b 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command::newlist;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger -command;
 use Promulger::List;
index 6afce38..cb4978f 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command::newsub;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger -command;
 use Promulger::List;
index 389bdb2..dc09e81 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command::rmlist;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger -command;
 use Promulger::List;
index f081f5b..2067c17 100644 (file)
@@ -1,6 +1,6 @@
 package App::Promulger::Command::rmsub;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger -command;
 use Promulger::List;
index af77ebf..7c36f47 100644 (file)
@@ -1,6 +1,6 @@
 package Promulger;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 our $VERSION = '0.000001'; # 0.0.1
 
index 47ffee7..6e68dad 100644 (file)
@@ -1,6 +1,6 @@
 package Promulger::Config;
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use Config::General;
 
index 354e8f7..7040046 100644 (file)
@@ -1,5 +1,6 @@
 package Promulger::List;
 use Moo;
+use autodie;
 
 use autodie ':all';
 use Carp;
index aa4d20d..0f275d8 100644 (file)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use Email::MIME;
 use File::Slurp 'read_file';
index b167230..78e6889 100644 (file)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use Promulger::List;
 
index c340348..a4333e6 100755 (executable)
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
-use strict;
-use warnings;
+use strictures 1;
+use autodie;
 
 use App::Promulger;
 
index 7edd1ea..929f606 100644 (file)
@@ -1,4 +1,5 @@
 use strictures 1;
+use autodie;
 use Test::Most;
 
 use_ok('Promulger');
index a398ab9..4c95eb6 100644 (file)
--- a/t/list.t
+++ b/t/list.t
@@ -1,10 +1,10 @@
 #!/usr/bin/perl
 use strictures 1;
 use autodie;
+use Test::Most;
 
 use File::Temp ();
 use Path::Class;
-use Test::Most;
 
 use aliased 'Promulger::List';
 # no alias here so we don't risk colliding with perl's own Config.pm -- apeiron,