Fix typo in comment

[gitmo/Moose.git] / lib / Moose / Meta / TypeConstraint / Parameterizable.pm

diff --git a/lib/Moose/Meta/TypeConstraint/Parameterizable.pm b/lib/Moose/Meta/TypeConstraint/Parameterizable.pm
index 93d0cc9..bc3b9ce 100644 (file)
--- a/lib/Moose/Meta/TypeConstraint/Parameterizable.pm
+++ b/lib/Moose/Meta/TypeConstraint/Parameterizable.pm
@@ -4,12 +4,11 @@ use strict;
 use warnings;
 use metaclass;
 
-our $VERSION   = '0.57';
+our $VERSION   = '0.59';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
 use base 'Moose::Meta::TypeConstraint';
-use Moose::Meta::TypeConstraint::Parameterized;
 
 __PACKAGE__->meta->add_attribute('constraint_generator' => (
     accessor  => 'constraint_generator',
@@ -41,34 +40,6 @@ sub _can_coerce_constraint_from {
     };
 }
 
-sub parse_parameter_str {
-    my ($self, $type_str) = @_;
-    return find_or_create_isa_type_constraint($type_str);
-}
-
-sub parameterize {
-       my ($self, @args) = @_;
-    
-    ## ugly hacking to deal with tc naming normalization issue
-    my ($tc_name, $contained_tc);
-    if (ref $args[0]) {
-        $contained_tc = shift @args;
-        $tc_name = $self->name .'['. $contained_tc->name .']';
-    } else {
-        ($tc_name, $contained_tc) = @args;
-    }
-       
-       unless($contained_tc->isa('Moose::Meta::TypeConstraint')) {
-               Moose->throw_error("The type parameter must be a Moose meta type");
-       }
-       
-    return Moose::Meta::TypeConstraint::Parameterized->new(
-        name           => $tc_name,
-        parent         => $self,
-        type_parameter => $contained_tc,
-    ); 
-}
-
 
 1;
 
@@ -91,14 +62,6 @@ Moose::Meta::TypeConstraint::Parameterizable - Higher Order type constraints for
 
 =item B<generate_constraint_for>
 
-=item B<parse_parameter_str>
-
-Given a string, convert it to a Perl structure.
-
-=item B<parameterize>
-
-Given an array of type constraints, parameterize the current type constraint.
-
 =item B<meta>
 
 =back