use strict;
use warnings;
-use Test::More tests => 8;
+use Test::More tests => 7;
use Test::Exception;
-BEGIN {
- use_ok('Moose::Autobox');
-}
+require Moose::Autobox;
=pod
}
}
-{
- package Moose::Autobox::SCALAR;
- use Moose 'with';
- with 'Units::Bytes';
-}
+Moose::Autobox->mixin_additional_role(SCALAR => 'Units::Bytes');
sub testing_bytes {
::dies_ok { 10->bytes } '... cannot do the autoboxing lexically';