Add failing test for initializer with class attr

[gitmo/MooseX-ClassAttribute.git] / t / 05-with-attribute-helpers-backcompat.t

use strict;
use warnings;

use Test::More;

use Test::Requires {
    'MooseX::AttributeHelpers' => 0.23,
};


{
    package MyClass;

    use Moose;
    use MooseX::ClassAttribute;
    use MooseX::AttributeHelpers;

    class_has counter =>
        ( metaclass => 'Counter',
          is        => 'ro',
          provides  => { inc => 'inc_counter',
                       },
        );
}

is( MyClass->counter(), 0 );

MyClass->inc_counter();
is( MyClass->counter(), 1 );

done_testing();