More uses of type in the tests

[gitmo/Mouse.git] / t / 800_shikabased / 802-mousex_types-isa-or.t

diff --git a/t/800_shikabased/802-mousex_types-isa-or.t b/t/800_shikabased/802-mousex_types-isa-or.t
index bd20f3a..693b9a1 100644 (file)
--- a/t/800_shikabased/802-mousex_types-isa-or.t
+++ b/t/800_shikabased/802-mousex_types-isa-or.t
@@ -9,13 +9,13 @@ use Test::More tests => 13;
     use MouseX::Types -declare => [qw/ Baz Type1 Type2 /];
     use MouseX::Types::Mouse qw( ArrayRef );
 
-    subtype Baz, where { defined($_) && $_ eq 'Baz' };
+    type Baz, where { defined($_) && $_ eq 'Baz' };
     coerce Baz, from ArrayRef, via { 'Baz' };
 
-    subtype Type1, where { defined($_) && $_ eq 'Name' };
+    type Type1, where { defined($_) && $_ eq 'Name' };
     coerce Type1, from 'Str', via { 'Names' };
 
-    subtype Type2, where { defined($_) && $_ eq 'Group' };
+    type Type2, where { defined($_) && $_ eq 'Group' };
     coerce Type2, from 'Str', via { 'Name' };
 
 }