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/020-BUILD.t | |
| parent | f1753ca22ba232a7509f3b59979b8ad960d8197a (diff) | |
| download | moosex-nonmoose-b68490edda877bcda983c96f728d1e04a583eb4f.tar.gz moosex-nonmoose-b68490edda877bcda983c96f728d1e04a583eb4f.zip | |
clean up tests a bit
Diffstat (limited to 't/020-BUILD.t')
| -rw-r--r-- | t/020-BUILD.t | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/t/020-BUILD.t b/t/020-BUILD.t index 8473dd3..aceff03 100644 --- a/t/020-BUILD.t +++ b/t/020-BUILD.t @@ -48,10 +48,10 @@ sub BUILD { package main; my $foo_moose = Foo::Moose->new; -is $foo_moose->class, 'Foo::Moose', 'BUILD method called properly'; -is $foo_moose->accum, 'a', 'BUILD method called properly'; +is($foo_moose->class, 'Foo::Moose', 'BUILD method called properly'); +is($foo_moose->accum, 'a', 'BUILD method called properly'); my $foo_moose_sub = Foo::Moose::Sub->new; -is $foo_moose_sub->class, 'Foo::Moose::Sub', 'parent BUILD method called'; -is $foo_moose_sub->bar, 'BAR', 'child BUILD method called'; -is $foo_moose_sub->accum, 'ab', 'BUILD methods called in the correct order'; +is($foo_moose_sub->class, 'Foo::Moose::Sub', 'parent BUILD method called'); +is($foo_moose_sub->bar, 'BAR', 'child BUILD method called'); +is($foo_moose_sub->accum, 'ab', 'BUILD methods called in the correct order'); |