2 # This is automatically generated by author/import-moose-test.pl.
3 # DO NOT EDIT THIS FILE. ANY CHANGES WILL BE LOST!!!
4 use t::lib::MooseCompat;
18 has 'array' => (is => 'ro');
19 has 'hash' => (is => 'ro');
25 use Mouse::Util::TypeConstraints;
29 => where { $_->isa('HTTPHeader') };
33 => via { HTTPHeader->new(array => $_[0]) }
35 => via { HTTPHeader->new(hash => $_[0]) };
42 default => sub { [ 'content-type', 'text/html' ] }
47 isa_ok($r, 'Request');
51 } '... this coerces and passes the type constraint even with lazy';