We were leaving the package name in the arg list

[gitmo/Moose.git] / t / 040_type_constraints / 026_normalize_type_name.t

diff --git a/t/040_type_constraints/026_normalize_type_name.t b/t/040_type_constraints/026_normalize_type_name.t
index db94421..4393fa8 100644 (file)
--- a/t/040_type_constraints/026_normalize_type_name.t
+++ b/t/040_type_constraints/026_normalize_type_name.t
@@ -124,7 +124,7 @@ ok my $subtype_b1 = subtype( 'subtype_b1' => as 'HashRef[Int|Str]' ), =>
 ok my $subtype_b2 = subtype( 'subtype_b2' => as 'HashRef[Int | Str]' ), =>
     'created subtype_b2';
 
-ok my $subtype_b3 = subtype( 'subtype_b2' => as 'HashRef[Str|Int]' ), =>
+ok my $subtype_b3 = subtype( 'subtype_b3' => as 'HashRef[Str|Int]' ), =>
     'created subtype_b3';
 
 is $subtype_b1->parent->name, $subtype_b2->parent->name => 'names match';