Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
eval around compile-time lookup failures
  • Loading branch information
moritz committed May 8, 2012
1 parent 86459a9 commit cecf9d0
Showing 1 changed file with 3 additions and 3 deletions.
6 changes: 3 additions & 3 deletions S11-modules/import-tag.t
Expand Up @@ -8,20 +8,20 @@ plan 12;
{
use t::spec::packages::S11-modules::Foo :others;

dies_ok { foo() }, 'foo() not imported - not tagged :others';
dies_ok { eval 'foo()' }, 'foo() not imported - not tagged :others';

ok( &bar, 'Foo::bar is defined (explicitly :DEFAULT and :others)' );
is( bar(), 'Foo::bar', 'Foo::bar is the sub we expect' );

ok( &baz, 'Foo::baz is defined (:MANDATORY)' );
is( baz(), 'Foo::baz', 'Foo::baz is the sub we expect' );

dies_ok { bop() }, 'bop() not imported';
dies_ok { eval 'bop()' }, 'bop() not imported';

ok( &qux, 'Foo::qux is defined (explicitly :others)' );
is( qux(), 'Foo::qux', 'Foo::qux is the sub we expect' );

dies_ok { waz() }, 'waz() not imported';
dies_ok { eval 'waz()' }, 'waz() not imported';

ok( &gaz, 'Foo::gaz multi is defined (implicitly :others)' );
is( gaz(), 'Foo::gaz1', 'Foo::gaz is the sub we expect' );
Expand Down

0 comments on commit cecf9d0

Please sign in to comment.