6 use Test::More tests => 12;
10 use_ok('MooseX::AttributeHelpers');
18 metaclass => 'Counter',
25 reset => 'reset_counter',
30 my $page = MyHomePage->new();
31 isa_ok($page, 'MyHomePage');
33 can_ok($page, $_) for qw[
41 $page->meta->remove_attribute('counter')
42 } '... removed the counter attribute okay';
44 ok(!$page->meta->has_attribute('counter'), '... no longer has the attribute');
46 ok(!$page->can($_), "... our class no longer has the $_ method") for qw[