use strict;
use warnings;
-use Test::More tests => 5;
+use Test::More;
use Test::Exception;
-BEGIN {
- use_ok('Moose');
-}
+
{
package Foo;
use Moose;
-
+
eval {
has 'foo' => (
is => "rw",
is( $foo->foo, "blah", "field is set via setter" );
}
+
+done_testing;