diff options
Diffstat (limited to 'gnu/usr.bin/perl/t/Module_Pluggable/10innerpack_noinner.t')
-rw-r--r-- | gnu/usr.bin/perl/t/Module_Pluggable/10innerpack_noinner.t | 34 |
1 files changed, 0 insertions, 34 deletions
diff --git a/gnu/usr.bin/perl/t/Module_Pluggable/10innerpack_noinner.t b/gnu/usr.bin/perl/t/Module_Pluggable/10innerpack_noinner.t deleted file mode 100644 index 5d40cd5cff3..00000000000 --- a/gnu/usr.bin/perl/t/Module_Pluggable/10innerpack_noinner.t +++ /dev/null @@ -1,34 +0,0 @@ -#!perl -w - -use strict; -use FindBin; -use lib "$FindBin::Bin/lib"; -use Test::More tests => 3; - - - -my $t = InnerTest->new(); - -my %plugins = map { $_ => 1 } $t->plugins; - -ok(keys %plugins, "Got some plugins"); -ok($plugins{'InnerTest::Plugin::Foo'}, "Got Foo"); -ok(!$plugins{'InnerTest::Plugin::Bar'}, "Didn't get Bar - the inner package"); - - - -package InnerTest; -use strict; -use Module::Pluggable require => 1, inner => 0; -use base qw(Module::Pluggable); - - -sub new { - my $class = shift; - return bless {}, $class; - -} - - -1; - |