Add a failing test for combination with MooseX::ClassAttribute
[gitmo/MooseX-AttributeHelpers.git] / t / 900_class_attribute.t
CommitLineData
6d043508 1#!/usr/bin/env perl
2use strict;
3use warnings;
4use Test::More tests => 2;
5
6do {
7 package TestClass;
8 BEGIN {
9 ::plan skip_all => "MooseX::ClassAttribute required for this test"
10 unless eval {
11 require MooseX::ClassAttribute;
12 MooseX::ClassAttribute->VERSION('0.05');
13 };
14 MooseX::ClassAttribute->import;
15 }
16
17 class_has counter => (
18 metaclass => 'Counter',
19 provides => {
20 inc => 'inc_counter',
21 },
22 );
23};
24
25is(TestClass->counter, 0);
26TestClass->inc_counter;
27is(TestClass->counter, 1);
28