X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fnamespace%2Fclean.pm;h=95a9ce19abba0a9c126832d34da3b168bfdda907;hb=7b026c56f169641f024652b823e67ebb934ba63a;hp=ab08964a6e7f0310efbd861a158423500a8f814a;hpb=1cd61d2e1a0205727210aee27a70000e74b9f417;p=p5sagit%2Fnamespace-clean.git

diff --git a/lib/namespace/clean.pm b/lib/namespace/clean.pm
index ab08964..95a9ce1 100644
--- a/lib/namespace/clean.pm
+++ b/lib/namespace/clean.pm
@@ -13,6 +13,9 @@ $STORAGE_VAR = '__NAMESPACE_CLEAN_STORAGE';
 
 BEGIN {
 
+  use warnings;
+  use strict;
+
   # when changing also change in Makefile.PL
   my $b_h_eos_req = '0.07';
 
@@ -31,12 +34,18 @@ BEGIN {
   {
     package namespace::clean::_TieHintHash;
 
+    use warnings;
+    use strict;
+
     use base 'Tie::ExtraHash';
   }
 
   {
     package namespace::clean::_ScopeGuard;
 
+    use warnings;
+    use strict;
+
     sub arm { bless [ $_[1] ] }
 
     sub DESTROY { $_[0]->[0]->() }