diff options
Diffstat (limited to 't/pragma/autouse.t')
-rw-r--r-- | t/pragma/autouse.t | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/t/pragma/autouse.t b/t/pragma/autouse.t index 3dc5483017..ecc1289167 100644 --- a/t/pragma/autouse.t +++ b/t/pragma/autouse.t @@ -6,12 +6,17 @@ BEGIN { } use Test; -BEGIN { plan tests => 9; } +BEGIN { plan tests => 10; } BEGIN { require autouse; eval { - "autouse"->import('List::Util' => 'List::Util::first'); + "autouse"->import('List::Util' => 'List::Util::first(&@)'); + }; + ok( !$@ ); + + eval { + "autouse"->import('List::Util' => 'Foo::min'); }; ok( $@, qr/^autouse into different package attempted/ ); |