X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FRole%2FParameterized%2FMeta%2FRole%2FParameterized.pm;h=f9518f02089ae899bffac09763d36626b7fc63f5;hb=7623a65e11d4190166bb8bc86efdc9c880c0c9f3;hp=56eae06aaa73e0a146096fd1d8d688930c983f35;hpb=533553a00a33a6c2cc933226afb0f41f35afc8d7;p=gitmo%2FMooseX-Role-Parameterized.git

diff --git a/lib/MooseX/Role/Parameterized/Meta/Role/Parameterized.pm b/lib/MooseX/Role/Parameterized/Meta/Role/Parameterized.pm
index 56eae06..f9518f0 100644
--- a/lib/MooseX/Role/Parameterized/Meta/Role/Parameterized.pm
+++ b/lib/MooseX/Role/Parameterized/Meta/Role/Parameterized.pm
@@ -4,33 +4,10 @@ use Moose;
 extends 'Moose::Meta::Role';
 
 has parameters => (
-    is       => 'rw',
-    isa      => 'MooseX::Role::Parameterized::Parameters',
-    required => 1,
+    is  => 'rw',
+    isa => 'MooseX::Role::Parameterized::Parameters',
 );
 
-# we override get_method_map because this is an anonymous role, there's no
-# package to check
-sub get_method_map {
-    my $self = shift;
-
-    return $self->{'methods'} ||= {};
-}
-
-# we override add_method because we don't want to install methods added through
-# this API; we just stick it in the method map
-sub add_method {
-    my ($self, $method_name, $method) = @_;
-    (defined $method_name && $method_name)
-    || Moose->throw_error("You must define a method name");
-
-    if (!blessed($method)) {
-        Moose->throw_error("You must pass a blessed method to add_method");
-    }
-
-    $self->get_method_map->{$method_name} = $method;
-}
-
 __PACKAGE__->meta->make_immutable;
 no Moose;