diff options
author | doy <doy@tozt.net> | 2009-04-20 02:58:09 -0500 |
---|---|---|
committer | doy <doy@tozt.net> | 2009-04-20 02:58:09 -0500 |
commit | b68490edda877bcda983c96f728d1e04a583eb4f (patch) | |
tree | 3130a282f45bd374b1b7dd0afab5f2cc22006f91 /t/010-immutable.t | |
parent | f1753ca22ba232a7509f3b59979b8ad960d8197a (diff) | |
download | moosex-nonmoose-b68490edda877bcda983c96f728d1e04a583eb4f.tar.gz moosex-nonmoose-b68490edda877bcda983c96f728d1e04a583eb4f.zip |
clean up tests a bit
Diffstat (limited to 't/010-immutable.t')
-rw-r--r-- | t/010-immutable.t | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/t/010-immutable.t b/t/010-immutable.t index 5ceb251..36430eb 100644 --- a/t/010-immutable.t +++ b/t/010-immutable.t @@ -33,11 +33,11 @@ __PACKAGE__->meta->make_immutable; package main; my $foo_moose = Foo::Moose->new(foo => 'FOO', bar => 'BAR'); -is $foo_moose->foo, 'FOO', 'foo set in constructor'; -is $foo_moose->bar, 'BAR', 'bar set in constructor'; +is($foo_moose->foo, 'FOO', 'foo set in constructor'); +is($foo_moose->bar, 'BAR', 'bar set in constructor'); $foo_moose->foo('BAZ'); $foo_moose->bar('QUUX'); -is $foo_moose->foo, 'BAZ', 'foo set by accessor'; -is $foo_moose->bar, 'QUUX', 'bar set by accessor'; -is $foo_moose->baz, 'Foo', 'baz method'; -is $foo_moose->quux, 'Foo::Moose', 'quux method'; +is($foo_moose->foo, 'BAZ', 'foo set by accessor'); +is($foo_moose->bar, 'QUUX', 'bar set by accessor'); +is($foo_moose->baz, 'Foo', 'baz method'); +is($foo_moose->quux, 'Foo::Moose', 'quux method'); |