diff options
author | dakkar <dakkar@thenautilus.net> | 2014-12-28 18:05:28 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2014-12-28 18:05:28 +0000 |
commit | 75300d3fde9ec8f5d4e98fa1ea7bab92dec1d725 (patch) | |
tree | 38d5f009efcbb99409438fa86f56b97b9d4cbd98 /lib/Net/Hawk/Role/WithUtils.pm | |
parent | everything ported to p6 (diff) | |
download | net-hawk-75300d3fde9ec8f5d4e98fa1ea7bab92dec1d725.tar.gz net-hawk-75300d3fde9ec8f5d4e98fa1ea7bab92dec1d725.tar.bz2 net-hawk-75300d3fde9ec8f5d4e98fa1ea7bab92dec1d725.zip |
cleanup for sharing
Diffstat (limited to 'lib/Net/Hawk/Role/WithUtils.pm')
-rw-r--r-- | lib/Net/Hawk/Role/WithUtils.pm | 24 |
1 files changed, 0 insertions, 24 deletions
diff --git a/lib/Net/Hawk/Role/WithUtils.pm b/lib/Net/Hawk/Role/WithUtils.pm deleted file mode 100644 index bd3a95d..0000000 --- a/lib/Net/Hawk/Role/WithUtils.pm +++ /dev/null @@ -1,24 +0,0 @@ -package Net::Hawk::Role::WithUtils; -use strict; -use warnings; -use 5.010; -use Package::Variant - importing => ['Moo::Role'], - subs => ['has']; -use Types::Standard 1.000003 qw(HasMethods); - -sub make_variant { - my ($class,$target_package,@methods) = @_; - - has _utils => ( - is => 'ro', - (@methods ? ( isa => HasMethods[@methods] ) : () ), - init_arg => 'utils', - default => sub { - require Net::Hawk::Utils; - Net::Hawk::Utils->new; - }, - ); -} - -1; |