X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F040_metaclass.t;h=72d0443e41a1bd88d100e0cd004cb38c0ff9b814;hb=860f85abed70a4947fb698784aa94252324d770d;hp=b8f49188bb35f3eba06b84d69bace470a0907a81;hpb=550d56db72e2f36b7fb88e6f9aa9d7f3d3fef53b;p=gitmo%2FClass-MOP.git diff --git a/t/040_metaclass.t b/t/040_metaclass.t index b8f4918..72d0443 100644 --- a/t/040_metaclass.t +++ b/t/040_metaclass.t @@ -1,12 +1,9 @@ -#!/usr/bin/perl - use strict; use warnings; -use Test::More tests => 12; +use Test::More tests => 11; -BEGIN { - use_ok('metaclass'); +BEGIN {use metaclass; } { @@ -33,8 +30,8 @@ isa_ok(Foo->meta, 'Class::MOP::Class'); package Bar; use metaclass 'BarMeta' => ( - ':attribute_metaclass' => 'BarMeta::Attribute', - ':method_metaclass' => 'BarMeta::Method', + 'attribute_metaclass' => 'BarMeta::Attribute', + 'method_metaclass' => 'BarMeta::Method', ); }