add strict/warnings all around to ease debugging

git-svn-id: svn://svn.open-ils.org/ILS/trunk@12359 dcc99617-32d9-48b4-a31d-7c20da2025e4

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm
index 6b7a864..71be4e5 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger;
+use strict; use warnings;
 use OpenILS::Application;
 use base qw/OpenILS::Application/;
 

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Cleanup.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Cleanup.pm
index 1b7e185..8250eb8 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Cleanup.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Cleanup.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::Cleanup;
+use strict; use warnings;
 sub fourty_two { return 42 }
 sub NOOP_True { return 1 }
 sub NOOP_False { return 0 }

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Collector.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Collector.pm
index e0ba462..db650ed 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Collector.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Collector.pm
@@ -1,3 +1,4 @@
 package OpenILS::Application::Trigger::Collector;
+use strict; use warnings;
 sub fourty_two { return 42 }
 1;

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm
index d6781cf..8f0a8e8 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Event.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::Event;
+use strict; use warnings;
 use OpenSRF::EX qw/:try/;
 
 use OpenSRF::Utils::Logger qw/:logger/;

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm
index 2c792e4..3547b9e 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/EventGroup.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::EventGroup;
+use strict; use warnings;
 use OpenILS::Application::Trigger::Event;
 use base 'OpenILS::Application::Trigger::Event';
 use OpenSRF::EX qw/:try/;

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/ModRunner.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/ModRunner.pm
index e8d4163..7cab0b1 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/ModRunner.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/ModRunner.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::ModLoader;
+use strict; use warnings;
 use UNIVERSAL::require;
 
 sub prefix { return 'OpenILS::Application::Trigger' }

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor.pm
index 54e72ad..8d8e417 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::Reactor;
+use strict; use warnings;
 use Template;
 use OpenSRF::Utils::Logger qw(:logger);
 

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/SendEmail.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/SendEmail.pm
index 0545e1c..a724f20 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/SendEmail.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/SendEmail.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::Reactor::SendEmail;
+use strict; use warnings;
 use Error qw/:try/;
 use Data::Dumper;
 use Email::Send;

diff --git a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/StaticEmail.pm b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/StaticEmail.pm
index bd29cad..289a444 100644 (file)
--- a/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/StaticEmail.pm
+++ b/Open-ILS/src/perlmods/OpenILS/Application/Trigger/Reactor/StaticEmail.pm
@@ -1,4 +1,5 @@
 package OpenILS::Application::Trigger::Reactor::StaticEmail;
+use strict; use warnings;
 use Error qw/:try/;
 use Data::Dumper;
 use Email::Send;