X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F000-recipes%2F001_point.t;h=1f52f0ff57f53c44a85780aed59bdc647f4b1b21;hb=e578d610be7812bb5fc5c861aeee01fe9270aa2f;hp=3a8bd33d8f5387242226455cf276f3411e974ee0;hpb=7af701163148f7c6f277796b309313b6c448ff54;p=gitmo%2FMouse.git diff --git a/t/000-recipes/001_point.t b/t/000-recipes/001_point.t index 3a8bd33..1f52f0f 100644 --- a/t/000-recipes/001_point.t +++ b/t/000-recipes/001_point.t @@ -6,7 +6,7 @@ use warnings; use Test::More; BEGIN { if (eval "require Class::Method::Modifiers; 1") { - plan tests => 57; + plan tests => 59; } else { plan skip_all => "Class::Method::Modifiers required for this test"; @@ -134,7 +134,7 @@ is_deeply( [ 'Mouse::Object' ], '... Point got the automagic base class'); -my @Point_methods = qw(meta new x y clear); +my @Point_methods = qw(meta new x y clear DESTROY); my @Point_attrs = ('x', 'y'); is_deeply( @@ -174,7 +174,7 @@ is_deeply( [ 'Point' ], '... Point3D gets the parent given to it'); -my @Point3D_methods = qw(new meta clear); +my @Point3D_methods = qw(new meta clear DESTROY); my @Point3D_attrs = ('z'); SKIP: {