There's no need ot expose Parameterizable's ->parse_type_constraint

[gitmo/Moose.git] / lib / Moose / Util / TypeConstraints.pm

diff --git a/lib/Moose/Util/TypeConstraints.pm b/lib/Moose/Util/TypeConstraints.pm
index ff621af..39e2acf 100644 (file)
--- a/lib/Moose/Util/TypeConstraints.pm
+++ b/lib/Moose/Util/TypeConstraints.pm
@@ -136,9 +136,7 @@ sub create_parameterized_type_constraint ($) {
 sub _create_parameterized_type_constraint {
     my ( $base_type_tc, $type_parameter ) = @_;
     if ( $base_type_tc->can('parameterize') ) {
-        my @type_parameters_tc
-            = $base_type_tc->parse_type_parameter($type_parameter);
-        return $base_type_tc->parameterize(@type_parameters_tc);
+        return $base_type_tc->parameterize($type_parameter);
     }
     else {
         return Moose::Meta::TypeConstraint::Parameterized->new(
@@ -245,7 +243,7 @@ sub find_or_parse_type_constraint ($) {
 
 sub normalize_type_constraint_name {
     my $type_constraint_name = shift @_;
-    $type_constraint_name =~s/\s//g;
+    $type_constraint_name =~ s/\s//g;
     return $type_constraint_name;
 }