implement to subtype's as is moose way
[gitmo/Mouse.git] / t / 800_shikabased / 009-overwrite-builtin-subtype.t
1 use strict;
2 use warnings;
3 use Test::More tests => 1;
4
5 eval {
6     package Request;
7     use Mouse::TypeRegistry;
8
9     subtype 'Int' => where { 1};
10 };
11 like $@, qr/The type constraint 'Int' has already been created, cannot be created again in Request/;