X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FRole.pm;h=6985dc2ba232e4dc4609f968ffaff939799d433f;hb=71367d2f2e9f0ccddcd36283ea2fb8115655fc3a;hp=a52c12ef273f74cdaafaba46201eeea5d5091220;hpb=45f22b92d1140ad101f7c3112bc565890ea5a1ad;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Meta/Role.pm b/lib/Mouse/Meta/Role.pm index a52c12e..6985dc2 100644 --- a/lib/Mouse/Meta/Role.pm +++ b/lib/Mouse/Meta/Role.pm @@ -1,5 +1,5 @@ package Mouse::Meta::Role; -use Mouse::Util qw(:meta not_supported english_list); # enables strict and warnings +use Mouse::Util qw(:meta not_supported); # enables strict and warnings use Mouse::Meta::Module; our @ISA = qw(Mouse::Meta::Module); @@ -85,7 +85,7 @@ sub _check_required_methods{ $role->throw_error(sprintf "'%s' requires the method%s %s to be implemented by '%s'", $role->name, (@missing == 1 ? '' : 's'), # method or methods - english_list(map{ sprintf q{'%s'}, $_ } @missing), + Mouse::Util::quoted_english_list(@missing), $consumer_class_name); } } @@ -330,7 +330,7 @@ Mouse::Meta::Role - The Mouse Role metaclass =head1 VERSION -This document describes Mouse version 0.49 +This document describes Mouse version 0.50 =head1 SEE ALSO