import strictures
Matt S Trout [Sun, 7 Nov 2010 01:41:30 +0000 (01:41 +0000)]
lib/Class/Tiny.pm
lib/Role/Tiny.pm

index 1bc127c..c36c3ec 100644 (file)
@@ -5,6 +5,7 @@ use Class::Tiny::_Utils;
 
 sub import {
   my $target = caller;
+  strictures->import;
   *{_getglob("${target}::extends")} = sub {
     *{_getglob("${target}::ISA")} = \@_;
   };
index 38ddb82..f71dcad 100644 (file)
@@ -8,6 +8,7 @@ our %APPLIED_TO;
 
 sub import {
   my $target = caller;
+  strictures->import;
   # get symbol table reference
   my $stash = do { no strict 'refs'; \%{"${target}::"} };
   # install before/after/around subs