X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F300_immutable%2F002_apply_roles_to_immutable.t;h=e37331192a1e5b400c968a400280c68abea2a878;hb=fe0194bf9198470966d089211902dc823d2bc70d;hp=cb86ed0e28bb29cfb528d5d7e5bc710e3153e40e;hpb=9df136d0ec3963a967e8ac7fdfacffa3e0d50cd9;p=gitmo%2FMoose.git

diff --git a/t/300_immutable/002_apply_roles_to_immutable.t b/t/300_immutable/002_apply_roles_to_immutable.t
index cb86ed0..e373311 100644
--- a/t/300_immutable/002_apply_roles_to_immutable.t
+++ b/t/300_immutable/002_apply_roles_to_immutable.t
@@ -3,12 +3,10 @@
 use strict;
 use warnings;
 
-use Test::More no_plan => 1;
+use Test::More tests => 4;
 use Test::Exception;
 
-BEGIN {
-    use_ok('Moose');
-}
+
 
 {
     package My::Role;
@@ -26,7 +24,7 @@ BEGIN {
     
     sub baz { 'Foo::baz' }
     
-	make_immutable(debug => 0);
+	__PACKAGE__->meta->make_immutable(debug => 0);
 }
 
 my $foo = Foo->new;