X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F201-squirrel.t;h=85c0fe5885a27f25017163576d87a85479d554b6;hb=7f7406a5026ff1f517e7753e12068a69620dace6;hp=198af9eb89d81cda24c7b9edf75cd81a9a27194b;hpb=eb061d5b0c1eea896c00ac732f6f4096255a79e3;p=gitmo%2FMouse.git diff --git a/t/201-squirrel.t b/t/201-squirrel.t index 198af9e..85c0fe5 100644 --- a/t/201-squirrel.t +++ b/t/201-squirrel.t @@ -4,7 +4,7 @@ use strict; use warnings; use Test::More; -use Scalar::Util 'blessed'; +use Mouse::Util 'blessed'; do { package Foo; @@ -56,12 +56,15 @@ eval " use Squirrel; has bar => (is => 'rw'); + __PACKAGE__->meta->make_immutable; package Bar; use Squirrel; has bar => (is => 'rw'); + __PACKAGE__->meta->make_immutable; "; +warn $@ if $@; is(blessed(Foo->meta->get_attribute('foo')), 'Mouse::Meta::Attribute'); is(blessed(Foo->meta->get_attribute('bar')), 'Mouse::Meta::Attribute', 'Squirrel is consistent if Moose was loaded between imports');