X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F402-attribute-application.t;h=e4745c5f36240bd6bfa0d53babe19e685cd9cbe4;hb=69645eb8a0ad7798ec847fb2720b9cbd7d23d949;hp=23ff3a2045924f8e3d038f38ccbb277d7253d219;hpb=8c831d08b0d23c9dfcc4a85f6444915c988b5538;p=gitmo%2FMouse.git diff --git a/t/402-attribute-application.t b/t/402-attribute-application.t index 23ff3a2..e4745c5 100644 --- a/t/402-attribute-application.t +++ b/t/402-attribute-application.t @@ -2,20 +2,21 @@ use strict; use warnings; use Test::More tests => 11; -use Mouse::Util ':test'; +use Test::Exception; do { package Role; use Mouse::Role; has 'attr' => ( + is => 'bare', default => 'Role', ); no Mouse::Role; }; -is_deeply(Role->meta->get_attribute('attr'), {default => 'Role'}); +is(Role->meta->get_attribute('attr')->{default}, 'Role'); do { package Class; @@ -33,6 +34,7 @@ do { use Mouse::Role; has 'attr' => ( + is => 'bare', default => 'Role2', ); @@ -55,6 +57,7 @@ lives_ok { with 'Role'; has attr => ( + is => 'bare', default => 'Class3', ); }; @@ -66,6 +69,7 @@ lives_ok { use Mouse; has attr => ( + is => 'bare', default => 'Class::Parent', ); };