6 use Test::More tests => 11;
12 use Moose::AttributeHelpers;
15 traits => ['Counter'],
22 reset_counter => 'reset',
27 my $page = MyHomePage->new();
28 isa_ok( $page, 'MyHomePage' );
30 can_ok( $page, $_ ) for qw[
38 $page->meta->remove_attribute('counter');
40 '... removed the counter attribute okay';
42 ok( !$page->meta->has_attribute('counter'),
43 '... no longer has the attribute' );
45 ok( !$page->can($_), "... our class no longer has the $_ method" ) for qw[