X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FPackage%2FVariant.pm;h=a76d75e7724f1c8050832fa4b3f637655287d05b;hb=192cd3271b84863fa5a649297fb0297ac150095a;hp=7175ac9e6e252696d976c1c5fcd4da9d86d921e9;hpb=68dc4fcd162349b9bad245b64af6e587935e5607;p=p5sagit%2FPackage-Variant.git diff --git a/lib/Package/Variant.pm b/lib/Package/Variant.pm index 7175ac9..a76d75e 100644 --- a/lib/Package/Variant.pm +++ b/lib/Package/Variant.pm @@ -1,11 +1,11 @@ package Package::Variant; -use strictures 1; +use strictures 2; use Import::Into; use Module::Runtime qw(require_module); use Carp qw(croak); -our $VERSION = '1.003000'; +our $VERSION = '1.003001'; $VERSION = eval $VERSION; @@ -139,7 +139,7 @@ Creation of anonymous variants: # declaring a variable Moo role package My::VariableRole::ObjectAttr; - use strictures 1; + use strictures 2; use Package::Variant # what modules to 'use' importing => ['Moo::Role'], @@ -160,7 +160,7 @@ Creation of anonymous variants: # using the role package My::Class::WithObjectAttr; - use strictures 1; + use strictures 2; use Moo; use My::VariableRole::ObjectAttr; @@ -174,7 +174,7 @@ And the same thing, only with named variants: # declaring a variable Moo role that can be named package My::VariableRole::ObjectAttrNamed; - use strictures 1; + use strictures 2; use Package::Variant importing => ['Moo::Role'], subs => [ qw(has around before after with) ]; use Module::Runtime 'module_notional_filename'; # only if you need protection @@ -201,7 +201,7 @@ And the same thing, only with named variants: # using the role package My::Class::WithObjectAttr; - use strictures 1; + use strictures 2; use Moo; use My::VariableRole::ObjectAttrNamed;