From ae1f145e84a0c5d182f113570f0387987efe5e02 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 3 Oct 2013 16:24:53 -0400 Subject: don't need List::MoreUtils --- lib/Bread/Board/Declare/Meta/Role/Attribute.pm | 1 - lib/Bread/Board/Declare/Meta/Role/Attribute/Service.pm | 5 ++--- lib/Bread/Board/Declare/Meta/Role/Class.pm | 1 - 3 files changed, 2 insertions(+), 5 deletions(-) diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm index 7a08376..a73828c 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute.pm @@ -2,7 +2,6 @@ package Bread::Board::Declare::Meta::Role::Attribute; use Moose::Role; # ABSTRACT: base attribute metarole for Bread::Board::Declare -use List::MoreUtils 'any'; use Moose::Util 'does_role', 'find_meta'; use Bread::Board::Declare::Meta::Role::Attribute::Container; diff --git a/lib/Bread/Board/Declare/Meta/Role/Attribute/Service.pm b/lib/Bread/Board/Declare/Meta/Role/Attribute/Service.pm index b1db7fd..ba81063 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Attribute/Service.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Attribute/Service.pm @@ -5,7 +5,6 @@ Moose::Util::meta_attribute_alias('Service'); use Bread::Board::Types; use Class::Load qw(load_class); -use List::MoreUtils qw(any); use Bread::Board::Declare::BlockInjection; use Bread::Board::Declare::ConstructorInjection; @@ -195,8 +194,8 @@ after _process_options => sub { || exists $opts->{value}; # XXX: uggggh - return if any { $_ eq 'Moose::Meta::Attribute::Native::Trait::String' - || $_ eq 'Moose::Meta::Attribute::Native::Trait::Counter' } + return if grep { $_ eq 'Moose::Meta::Attribute::Native::Trait::String' + || $_ eq 'Moose::Meta::Attribute::Native::Trait::Counter' } @{ $opts->{traits} }; my $exists = exists($opts->{default}) ? 'default' : 'builder'; diff --git a/lib/Bread/Board/Declare/Meta/Role/Class.pm b/lib/Bread/Board/Declare/Meta/Role/Class.pm index 0191a2c..580cac1 100644 --- a/lib/Bread/Board/Declare/Meta/Role/Class.pm +++ b/lib/Bread/Board/Declare/Meta/Role/Class.pm @@ -4,7 +4,6 @@ use Moose::Role; use Bread::Board::Service; use Class::Load qw(load_class); -use List::MoreUtils qw(any); =head1 DESCRIPTION -- cgit v1.2.3