use strict;
use warnings;
-use Test::More tests => 3;
+use Test::More tests => 2;
use Test::Exception;
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package Foo;
use Moose;
package Stuffed::Role;
use Moose::Role;
+ use Moose::AttributeHelpers;
has 'options' => (
traits => ['Collection::Array'],
package Bulkie::Role;
use Moose::Role;
+ use Moose::AttributeHelpers;
has 'stuff' => (
traits => ['Collection::Array'],
use strict;
use warnings;
-use Test::More tests => 13;
+use Test::More tests => 12;
use Test::Moose;
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package MyHomePage;
use Moose;
+ use Moose::AttributeHelpers;
has 'counter' => ( traits => ['Counter'] );
}
use strict;
use warnings;
-use Test::More tests => 12;
+use Test::More tests => 11;
use Test::Exception;
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package MyHomePage;
use Moose;
+ use Moose::AttributeHelpers;
has 'counter' => (
traits => ['Counter'],
use strict;
use warnings;
-use Test::More tests => 29;
-
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
+use Test::More tests => 28;
{
package Subject;
use strict;
use warnings;
-use Test::More tests => 17;
+use Test::More tests => 16;
use Test::Moose 'does_ok';
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package MyHomePage;
use Moose;
+ use Moose::AttributeHelpers;
has 'counter' => (
traits => [qw/Counter/],
use strict;
use warnings;
-use Test::More tests => 69;
+use Test::More tests => 68;
use Test::Exception;
use Test::Moose 'does_ok';
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
my $sort;
{
package Stuff;
use Moose;
+ use Moose::AttributeHelpers;
has 'options' => (
traits => [qw/Collection::Array/],
use strict;
use warnings;
-use Test::More tests => 47;
+use Test::More tests => 46;
use Test::Exception;
use Test::Moose 'does_ok';
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package Stuff;
use Moose;
use strict;
use warnings;
-use Test::More tests => 26;
+use Test::More tests => 25;
use Test::Moose;
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package Real;
use Moose;
+ use Moose::AttributeHelpers;
has 'integer' => (
traits => [qw/Number/],
use strict;
use warnings;
-use Test::More tests => 34;
+use Test::More tests => 33;
use Test::Exception;
use Test::Moose 'does_ok';
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
my $sort;
my $less;
my $up;
{
package Stuff;
use Moose;
+ use Moose::AttributeHelpers;
has '_options' => (
traits => [qw/Collection::List/],
use strict;
use warnings;
-use Test::More tests => 20;
+use Test::More tests => 19;
use Test::Exception;
use Test::Moose 'does_ok';
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
{
package Stuff;
use strict;
use warnings;
-use Test::More tests => 20;
+use Test::More tests => 19;
use Test::Moose 'does_ok';
-BEGIN {
- use_ok('Moose::AttributeHelpers');
-}
-
my $uc;
{
package MyHomePage;
use Moose;
+ use Moose::AttributeHelpers;
has 'string' => (
traits => [qw/String/],
use warnings;
use Test::More tests => 8;
-use Moose::AttributeHelpers;
{
-
package Room;
use Moose;
+ use Moose::AttributeHelpers;
+
has 'is_lit' => (
traits => ['Bool'],
is => 'rw',